㈠ VB利用Inet下载Ftp文件出错
这明显是说没连上ftp服务器；
Inet1.Cancel 你主动把连接放弃了！把这句注释掉！
㈡ vb怎么读取FTP文件大小
要用到inet控件。public strData as string
'这段可以返回服务器中的第一级目录名，保存在strData中， 如有多个文件夹名每个文件夹名会以空格分开。读取时判段一下。
Inet1.Execute Inet1.URL, "dir """ & dirName & """"
Do
DoEvents
Loop While Inet1.StillExecuting = True
msgbox strData
'这段是进入目录中，要想获得服务器中所有的文件夹名，就可以用递规的办法来获得。
Inet1.Execute Inet1.URL, "cd """ & dirName & """"
Do
DoEvents
Loop While Inet1.StillExecuting = True
Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
StatusBar1.Panels.Item(1).Text = "该控件正在查询所指定的主机的 IP 地址"
Case 2
StatusBar1.Panels.Item(1).Text = "该控件已成功地找到所指定的主机的 IP 地址"
Case 3
StatusBar1.Panels.Item(1).Text = "该控件正在与主机连接"
Case 4
StatusBar1.Panels.Item(1).Text = "该控件已与主机连接成功"
Case 5
StatusBar1.Panels.Item(1).Text = "该控件正在向主机发送请求"
Case 6
StatusBar1.Panels.Item(1).Text = "该控件发送请酣海丰剿莶济奉汐斧搂求已成功"
Case 7
StatusBar1.Panels.Item(1).Text = "该控件正在接收主机的响应"
Case 8
StatusBar1.Panels.Item(1).Text = "该控件已成功地接收到主机的响应"
㈢ vb如何实现FTP下载
Call Inet1.Execute(,"put 本地地址\文件名 ftp地址\文件名")‘上传ftp文件代码
Call Inet1.Execute(,"get ftp地址\文件名 本地地址\文件名")’下载ftp文件代码
你要在inet1的自定义中设置好
㈣ VB Inet控件 FTP上传 实时错误“35756” “不能完成请求” 怎么解决
应该把
Inet6.Cancel
和
Inet6.Execute , "CLOSE"
Inet6.Execute , "QUIT"
移到循环外面，比如：
Inet6.Cancel
For i = 0 To List1.ListCount - 1
Inet6.Execute , "get MZ/" & List1.List(i) & " D:\NCTEMP" & List1.List(i)
Do While Inet6.StillExecuting
DoEvents
Loop
Next
Inet6.Execute , "CLOSE"
Inet6.Execute , "QUIT"
下面的上传文件也一样。
FTP的get命令和put命令是可以连续执行的，无需下载一个文件就退出，然后又再登录下载下一个文件，这样不但效率低，而且很可能就是在这个不断登录的过程中造成文件下载异常。
限于条件，以上语句我无法测试，你自己试试看对不对。
㈤ VB 上传ftp
Private Sub Command1_Click()
Inet1.URL = "ftp://210.83.61.42/"
Inet1.Password = "111"
Inet1.UserName = "111"
Inet1.OpenURL
Inet1.Execute , "put d:\a.txt /d:/ftp/wwwroot/a.txt" 'put方法，d:\a.txt是本地路径
Inet1.Execute , "QUIT"
End Sub
㈥ vb中inet的用法（连接一个ftp）
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 "", "PUT d:\1.txt 1.txt"
ri = Inet1.StillExecuting
Do While ri
ri = Inet1.StillExecuting
DoEvents
Loop
㈦ vb6.0用inet空间获取ftp文件列表的问题
从上面代码看， OperationStyle变量没有定义，所以出现上述问题。
其他代码不变，只对下面代码进行修改即可：
Case 12 ‘不要8
Select Case OperationStyle
Case 2
Text1.Text = Text1.Text & vbCrLf & "成功改变目录"
listserver
Case Else
Text1.Text = Text1.Text & vbCrLf & "成功列出目录"
ListView1.ListItems.Clear
inetdata = Inet1.GetChunk(1024, 0)
If Trim(inetdata) <> 0 Then
temparray = Split(inetdata, vbCrLf, , vbTextCompare)
i = 0
Do While i < UBound(temparray)
If temparray(i) <> "" Then
deallist (temparray(i))
End If
i = i + 1
Loop
End If
End Select
End Select
Text1.SelLength = Len(Text1.Text)
End Sub
㈧ vb用INET1,从FTP下TXT文件
1、INET打开FTP服务需要时间，所以不推荐在with块中执行Execute
2、Execute "ftp://1234:[email protected]", "get" & strInspectPanelId & ".txt c:\" & strInspectPanelId & ".txt"
中的get后面应该有个空格！
3、不需要写成Execute "ftp://1234:[email protected]", "get" & strInspectPanelId & ".txt c:\" & strInspectPanelId & ".txt"
写成Execute "", "get " & strInspectPanelId & ".txt c:\" & strInspectPanelId & ".txt"就行了！
㈨ VB中怎么写，打开之后就进入一个FTP，自动输入密码。读取到FTP上的文件
添加一个部件“Microsoft Internet Transfer Control”然后在窗体上添加一个此对象“Inet1”，设置属性Protocol：2-icFTPRemoteHost：你的FTP服务器IPUsername：你的用户名Password：你的密码 然后再用相关FTP命令读取服务器中的文件.