关于inet下载文件提示仍在执行上一请求的问题,在线等。
想用inet控件实现ftp的下载,可是用此用户登录需要返回到父目录再进入需要访问的文件夹,代码如下,无法实现下载,如访问我使用的用户的文件夹就可以。Inet1.URL = "192.168.2.1"
Inet1.UserName = "he"
Inet1.Password = "zz123"
Inet1.AccessType = icUseDefault '设置与Internet连接的类型,默认值
Inet1.Protocol = icFTP
Inet1.RemotePort = 21
Inet1.Cancel
Inet1.Execute , "CD.. "
Do While Inet1.StillExecuting
DoEvents
Loop
Inet1.Execute , "GET " & "/he8c/111.jpg/" & App.path & "\111.jpg"
Do While Inet1.StillExecuting
DoEvents
Loop
Inet1.Execute , "close"
Inet1.Execute , "quit"
If Dir(App.path & "\111.jpg") = "" Then
MsgBox ("CAN NOT FIND THE TESTDATA")
'Label3.Caption = "下载成功"
Else
MsgBox ("下载成功!")
End If --------------------编程问答-------------------- 看到的帮忙分析一下。谢谢。 --------------------编程问答-------------------- 没有人知道吗? --------------------编程问答-------------------- 查了好多帖子都不行。
补充:VB , 控件