UC知道VB中关于Microsoft Internet Transfer
来源：百度知道 编辑：UC知道 时间：2024/06/28 19:56:54
利用Microsoft Internet Transfer从远程ftp下载文件
Private Sub Command1_Click()
Inet1.Password = "XXXX"
Inet1.UserName = "XXXX"
Inet1.URL = "XXX.XXX.XXX.XXX"
Inet1.OpenURL
Inet1.Execute , "Get 5944.htm D:\5944.htm"
Inet1.Execute , "QUIT"
End Sub
执行之后提示错误不能完成请求
请问有什么解决办法?
Private Sub Command1_Click()
Inet1.Password = "XXXX"
Inet1.UserName = "XXXX"
Inet1.URL = "XXX.XXX.XXX.XXX"
Inet1.OpenURL
Inet1.Execute , "Get 5944.htm D:\5944.htm"
Inet1.Execute , "QUIT"
End Sub
执行之后提示错误不能完成请求
请问有什么解决办法?
给你一个提示，你在调试一下：
第一步：你要设置信息：
Inet1.Protocol = icFTP
Inet1.RemoteHost = ServerName'服务器地址
Inet1.RemotePort = 21'FTP端口
Inet1.UserName = uName'用户名
Inet1.Password = uPWS'密码
你要下载文件，要使用如下的代码：
Inet1.Execute "", "GET 1.txt d:\1.txt"
ri = Inet1.StillExecuting
Do While ri
ri = Inet1.StillExecuting
DoEvents
Loop
你 Inet1.Execute , "Get 5944.htm D:\5944.htm"出了问题！