VB.NET 怎么將FTP文件移動到FTP下另一個目錄中去

給你個方法原型：

創(chuàng)新互聯(lián)建站擁有網(wǎng)站維護技術和項目管理團隊，建立的售前、實施和售后服務體系，為客戶提供定制化的網(wǎng)站設計制作、成都網(wǎng)站制作、網(wǎng)站維護、服務器托管解決方案。為客戶網(wǎng)站安全和日常運維提供整體管家式外包優(yōu)質服務。我們的網(wǎng)站維護服務覆蓋集團企業(yè)、上市公司、外企網(wǎng)站、商城網(wǎng)站建設、政府網(wǎng)站等各類型客戶群體，為全球近千家企業(yè)提供全方位網(wǎng)站維護、服務器維護解決方案。

File.Copy("~\*.*","~\",Boolean)第一個參數(shù)是String,指定原文件的Path；

第二個參數(shù)是String,指定拷貝目標Path；

第三個參數(shù)是Boolean，表示覆蓋同名文件。

自己修改一下即可。

vb.net ftp上傳文件

Dim OpenFileDialog As New OpenFileDialog

OpenFileDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments

OpenFileDialog.Filter = "文本文件(*.jpg)|*.jpg|所有文件(*.*)|*.*"

If (OpenFileDialog.ShowDialog(Me) = System.Windows.Forms.DialogResult.OK) Then

Dim FileName As String = OpenFileDialog.FileName

' TODO: 在此處添加打開文件的代碼。

textbox1.Text = FileName

End If

第一個按鈕 上傳

Dim filelast As String = fileaddbefore.Text.Substring(fileaddbefore.Text.LastIndexOf("."), fileaddbefore.Text.Length - fileaddbefore.Text.LastIndexOf("."))

MessageBox.Show(filelast)

My.Computer.Network.UploadFile(textbox1.Text, "" 文件名.Text filelast, "登錄名1", "登錄密碼", True, 100)

第二個按鈕

跪求在visual studio2005下用腳本任務vb.net實現(xiàn)上傳文件至FTP功能（應用變量）

Const?SYNCHRONIZE?=?H100000

Const?INFINITE?=?HFFFFFFFF

Private?Declare?Function?OpenProcess?Lib?"kernel32"?(ByVal?dwDesiredAccess?As?Long,?ByVal?bInheritHandle?As?Long,?ByVal?dwProcessId?As?Long)?As?Long

Private?Declare?Function?CloseHandle?Lib?"kernel32"?(ByVal?hObject?As?Long)?As?Long

Private?Declare?Function?WaitForSingleObject?Lib?"kernel32"?(ByVal?hHandle?As?Long,?ByVal?dwMilliseconds?As?Long)?As?Long

Private?Sub?Command1_Click()

Dim?filename?As?String

Dim?ftp?As?String

Dim?uname?As?String

Dim?upin?As?String

ftp?=?InputBox("請輸入服務器地址")

uname?=?InputBox("請輸入帳號",?,?"anonymous")

upin?=?InputBox("請輸入密碼",?,?"IE@User")

filename?=?Timer()

Open?filename??".script"?For?Output?As?#1

Print?#1,?"user"

Print?#1,?uname

Print?#1,?upin

Print?#1,?"pwd"

Print?#1,?"hash"

Print?#1,?"put?"??filename??".txt"

Print?#1,?"quit"

Close?#1

Open?filename??".txt"?For?Output?As?#1

Print?#1,?Text1.Text

Print?#1,?Combo1.Text

Close?#1

DoEvents

Dim?pId?As?Long,?pHnd?As?Long

pId?=?Shell("ftp?-n?-s:"??filename??".script"??"?"??ftp,?vbHide)

pHnd?=?OpenProcess(SYNCHRONIZE,?0,?pId)

If?pHnd??0?Then

Call?WaitForSingleObject(pHnd,?INFINITE)

Call?CloseHandle(pHnd)

End?If

Kill?filename??".script"

End?Sub

如果你覺得可以，把100分給我吧

我的方法很另類，給你說說過程

為了不重復文件名，我取時間為文件名filename

生成filename.script腳本，傳輸FTP用

生成filename.txt保存了combo1和text1的文字

調用ftp命令傳輸，不需要inet或winsock控件

API是SHELL WAIT功能，因為script腳本保存了帳號和密碼，當傳輸完成后刪除filename.script腳本

覺得如何，如果用inet不如這個簡單，畢竟FTP不是自己寫的，不管PASV與否都正常使用，唯一就是密碼保存要等傳輸完成

你想的第一個方案是不可能的，F(xiàn)TP是文本傳輸協(xié)議，與HTTP不一樣，不能寫POST，實在想那樣，VB做不了，需要手動創(chuàng)建數(shù)據(jù)包欺騙服務器