si lo so anch io ne gestisto uno!Originariamente inviato da alka
Il linguaggio va indicato anche nel titolo, come da Regolamento: qui l'ho aggiunto io.
Inoltre, se si trova autonomamente la soluzione al problema, questa andrebbe riportata in modo che sia utile a chiunque si trovi in futuro nella medesima situazione: questo è lo spirito del forum.
con questo codice puoi fare download del file
e se per caso il server e out
io ho aggiunto try catch per le mie esigenze
Dim uri As New Uri("ftp://" & TextBox2.Text & "/directory.txt")
If (uri.Scheme = uri.UriSchemeFtp) Then
Dim request As FtpWebRequest = FtpWebRequest.Create(uri)
request.Method = WebRequestMethods.Ftp.DownloadFile
request.Credentials = New NetworkCredential(TextBox3.Text, TextBox4.Text)
request.UseBinary = False
request.Timeout = 5000
request.Proxy = Nothing
request.KeepAlive = False
Dim response As FtpWebResponse = request.GetResponse()
Dim reader As New StreamReader(response.GetResponseStream())
Dim tmp As String = reader.ReadToEnd()
response.Close()
Me.RichTextBox1.Text = tmp
End If

Rispondi quotando