Dim OpenFileDialog As New OpenFileDialog
成都創(chuàng)新互聯(lián)公司專業(yè)為企業(yè)提供裕安網(wǎng)站建設(shè)、裕安做網(wǎng)站、裕安網(wǎng)站設(shè)計、裕安網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計與制作、裕安企業(yè)網(wǎng)站模板建站服務(wù),10多年裕安做網(wǎng)站經(jīng)驗,不只是建網(wǎng)站,更提供有價值的思路和整體網(wǎng)絡(luò)服務(wù)。
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)
第二個按鈕
My.Computer.Network.UploadFile(本地文件路徑,?ftp服務(wù)器路徑包括文件名,用戶名,密碼)
具體方法如下:”、打開Serv-U的配置管理界面puzb在“全局用戶”或者“域用戶”中選擇“創(chuàng)建cgko修改和刪除用戶帳戶”; 2、在“創(chuàng)建,修改和刪除用戶帳戶”的界面,選擇“添加”。;3、在“用戶屬性“對話框,“用戶信息”下的用戶名為:Anonymous,密碼為空,為其指定FTP的根目錄。 4、然后在“目錄訪問“選項,點擊“添加”,為其指定訪問權(quán)限和目錄?!?、最后點擊“保存”6這樣我們就成功添加了匿名用戶。
If My.Computer.Network.IsAvailable Then
'如果可用
Else
'不可用
End If
Public Sub DownloadFile ( _
address As Uri, _
destinationFileName As String, _
userName As String, _
password As String, _
showUI As Boolean, _
connectionTimeout As Integer, _
overwrite As Boolean, _
onUserCancel As UICancelOption _
)
參數(shù)
address
String 或 Uri。要下載的文件的路徑,包括文件名和主機地址。必選。
destinationFileName
String。下載文件的文件名和路徑。必選。
userName
String。要進行身份驗證的用戶名。默認值為空字符串 ""。
password
String。要進行身份驗證的密碼。默認值為空字符串 ""。
showUI
Boolean。指定是否顯示操作進度。默認為 False。
connectionTimeout
Int32。以毫秒為單位的超時間隔。默認值為 100 秒。
overwrite
Boolean。指定是否改寫現(xiàn)有文件。默認為 False。
onUserCancel
UICancelOption。指定當(dāng)用戶在對話框(此對話框在 ShowUI 設(shè)置為 True 時顯示)上單擊“取消”或“否”時的行為。默認為 ThrowException。