Torna al Thread
' otteniamo il path della cartella principale dell'applicazione
Dim filePath As String = Request.PhysicalApplicationPath
' aggiungiamo il nome della nostra cartella al path
filePath += "FileUpload/"
' controlliamo se il controllo FileUpload1 contiene un file da caricare
If FileUpload1.HasFile Then
' controllo la dimensione del file
If FileUpload1.PostedFile.ContentLength > 4000000 Then
Response.Write("Il file non può essere caricato perché supera 1MB!")
Else
' aggiorniamo il path del file
filePath += FileUpload1.FileName
If System.IO.File.Exists(filePath) Then
' il file è già sul server
Response.Write("Il file non può essere caricato perché già presente sul server!")
Else
' salviamo il file nel percorso calcolato
FileUpload1.SaveAs(filePath)
' mandiamo un messaggio all'utente
Response.Write("File caricato!")
End If
End If
Else
Response.Write("Il file non è stato caricato!")
End If