㈠ 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命令讀取伺服器中的文件.