reza_devel0per
جمعه 31 خرداد 1392, 12:21 عصر
سلام ، من این متد رو برای آپلود فایل نوشتم :
Private Sub UploadFile(ByVal strFilePath As String, ByVal strURLPath As String, ByVal UserName As String, ByVal Password As String)
If File.Exists(strFilePath) = False Then
MsgBox("File Not found.")
Exit Sub
End If
Dim uri As New Uri(strURLPath)
Dim webClient As New WebClient()
Dim credentials As New NetworkCredential(UserName, Password)
webClient.Credentials = credentials
webClient.UploadFile(uri, strFilePath)
MsgBox("finish")
End Sub
و به این صورت هم استفاده می کنم :
UploadFile("d:\filename.txt", "http://mysite/foldername/filename.txt", "myFtpAccountUsername", "mypassword")
ولی با خطای :
The remote server returned an error: (404) Not Found.مواجه میشم!
مشکل از چیه؟!
مرسی
Private Sub UploadFile(ByVal strFilePath As String, ByVal strURLPath As String, ByVal UserName As String, ByVal Password As String)
If File.Exists(strFilePath) = False Then
MsgBox("File Not found.")
Exit Sub
End If
Dim uri As New Uri(strURLPath)
Dim webClient As New WebClient()
Dim credentials As New NetworkCredential(UserName, Password)
webClient.Credentials = credentials
webClient.UploadFile(uri, strFilePath)
MsgBox("finish")
End Sub
و به این صورت هم استفاده می کنم :
UploadFile("d:\filename.txt", "http://mysite/foldername/filename.txt", "myFtpAccountUsername", "mypassword")
ولی با خطای :
The remote server returned an error: (404) Not Found.مواجه میشم!
مشکل از چیه؟!
مرسی