'.ics'
アクティブな FTP サーバーにファイルをアップロードしようとしています
名前空間:
Imports System
Imports System.IO
Imports System.Data.OleDb
Imports System.Collections
Imports Microsoft.VisualBasic
Imports System.Net
Imports System.Text
コード:
'Create a FTP Request Object and Specfiy a Complete Path
Dim reqObj As FtpWebRequest = WebRequest.Create(Ziel + "Calendar/" + MitarbeiterNr + ".ics")
reqObj.Method = WebRequestMethods.Ftp.UploadFile
reqObj.UsePassive = False
reqObj.Credentials = New NetworkCredential(User, Password)
reqObj.Proxy = Nothing
reqObj.KeepAlive = False
reqObj.UseBinary = False
reqObj.Timeout = 5000
Dim sourceStream As FileStream = File.OpenRead(AppPath + "Ablage\" + MitarbeiterNr + "\" + MitarbeiterNr + ".ics") ' store file in buffer
Dim buffer(Convert.ToInt32(sourceStream.Length)) As Byte
sourceStream.Read(buffer, 0, buffer.Length)
sourceStream.Close()
reqObj.ContentLength = buffer.Length
'Dim objUTF8 As New UTF8Encoding()
'lblMsg.Text &= objUTF8.GetString(buffer)
'Upload File and set its object to nothing
Dim requestStream As System.IO.Stream
Try
requestStream = reqObj.GetRequestStream() 'times out here
requestStream.Write(buffer, 0, buffer.Length)
requestStream.Close()
Catch ex As Exception
Debug.printMeldung(ex.Message & ex.Source & ex.StackTrace)
End Try
reqObj = Nothing
使用されるユーザーには、書き込みなどに必要な権限があります。URI は次のようになります。
ftp://Serveradress/Calendar/filename.ics
これが私が得るエラーメッセージですrequestStrem = reqObj.GetRequestStream()
:
Der Remoteserver hat einen Fehler zurückgegeben (550) Datei nicht verfügbar (zB nicht gefunden oder kein Zugriff).System bei System.Net.FtpWebRequest.SyncRequestCallback(Object obj) bei System.Net.FtpWebRequest.RequestCallback(Object obj) bei System.Net .CommandStream.InvokeRequestCallback(Object obj) System.Net.CommandStream.Abort(Exception e) System.Net.FtpWebRequest.FinishRequestStage(RequestStage stage) System.Net.FtpWebRequest.GetRequestStream() Calendar.Calendar.Upload(String) MitarbeiterNr) の DVisualStudio 2008CalendarCalendarCalendar.vbZeile 240。
ドイツ語で申し訳ありませんが、ほとんどの人はそれを読むことができると思います;-)
ここからコードをひったくった
誰かが問題をすぐに解決するのを手伝ってくれたら嬉しいです =)
ライトモンク