奇怪，wininet用到ftpfindfirstfilea的时候取不到数据了

[龙腾九霄]

String filename
Long filehandle
String fullpathfilename
String ftp_remotefile
String localfullpathfilename
String filecontent
String str_error

ftp_remotefile = ftp_remotedir + ftp_remotefiletype

LInternetOpen = InternetOpenA("FTP Control", 1, "", "", 0)
if LInternetOpen =0 then
messagebox("","初始化ftp连接失败")
return ""
end if

LFtpConnect = internetconnecta(LInternetOpen,ftp_ip, ftp_port, ftp_uid, ftp_pwd,1,0,0)

If LFtpConnect = 0 Then
str_error = "由于网络错误导致连接ftp服务器失败"
messagebox("","接收远程服务器文件失败！可能原因:" + str_error )
return ""
end if


messagebox("","连接ftp服务器成功")

//到此处运行正常，并且成功取得了文件句柄...
stru_WIN32_FIND_DATA f_find

LFindFileHandle = ftpfindfirstfilea(LFtpConnect, ref ftp_remotefile, ref f_find, 0, 0)

filename = f_find.cfilename


messagebox(string(LInternetOpen),string(LFtpConnect) +" "+string(LFindFileHandle))
messagebox("",filename)
messagebox("",f_find.calternatefilename)

//此处未获得ftp文件名，请高手指点
If LFindFileHandle > 0 Then

fullpathfilename = ftp_remotedir + filename
localfullpathfilename = localpath + filename
messagebox(fullpathfilename,localfullpathfilename)

end if

(解决此问题可续加分) 急急急。。。。。

[wu_07]

ftp_remotefile =space(255)

[龙腾九霄]

ftp_remotefile = ftp_remotedir + ftp_remotefiletype
已经附过值了啊。。。。

[龙腾九霄]

以上内容是我一个函数内的代码
其中ftp_remotefile="djmis_update/wz/"
LFtpConnect 已经成功获得句柄
LFindFileHandle 也成功获得句柄。
但是f_find内接收不到文件名等信息。。。。

[龙腾九霄]

在线等待................

[JIABAOYU111]

我也有同样的问题！不知道怎么解决