Ogni tanto ci provo.
Ho realizzato una stupidissima applicazione che fa upload di un file su un server FTP.
L'accrocchio funziona correttamente ma con un piccolo problema...
Quando lancio l'upload, per tutta la durata del trasferimento del file, l'applicazione si blocca e spesso clickando sull'area della form l'applicazione mi va in errore...
Sulla barra del titolo viene scritto (Non risponde)
Considerato che il file da spedire è magari di 400-500 Kb e l'applicazione andrà in mano a degli utenti finali... che si divertono a clickare ...
Cosa sto sbagliando ???
Grazie anticipate
Andrea
codice:
Imports System.Net
Imports system.IO
Public Class Form1
Dim FTP As String = "ftp://111.111.111.111/"
Dim fileremoto As String = "pippo.txt"
Dim filelocale As String = "pippo.txt"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Function inviafile()
Dim spedizione As New Net.WebClient
Try
spedizione.Credentials = New NetworkCredential("collegamento", "1234")
spedizione.UploadFile(FTP & fileremoto, filelocale)
Return True
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical)
Return False
Finally
Beep()
End Try
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.inviafile()
End Sub
End Class