Programmazione Web » Asp.NET » Upload di un file con Asp.net
Upload di un file con Asp.net
Difficoltà:
Scritto da Andrea Benaglio
Sito Web: http://www.dotnetit.com ![]()
Questo tutorial è stato letto 1145 volte
ASP.NET ha semplificato notevolmente l'operazione di upload di files, introducendo delle Classi apposite; in questo tips verrà illustrata una semplice procedura per il caricamento di un file sul Server.
Come avveniva nel Classic ASP, anche in questo caso, dobbiamo creare un WebForm per selezionare il file:
<html>
<body>
<form enctype="multipart/form-data" runat=server>
Selezionare il file:
<input id="txtUpload" type=file runat=server>
<asp:button id=btnUpload Text="Salva File" OnClick="CaricamentoFile" runat=server/>
<asp:label id="lblRisultato" Visible=false runat=server/>
</form>
</body>
</html>
Analizziamo ora il codice necessario per eseguire l'upload:
<script language="VB" runat=server>
Sub CaricamentoFile(Sender As Object, e As System.EventArgs)
Dim sPath as String
Dim sFile as String
Dim sFullPath as String
Dim sSplit() as String
Dim sPathFriendly as String
' Viene recuperato il percorso fisico della cartella
sPath = Server.MapPath(".")
If Right(sPath, 1) <> "\" then
' Variabile utilizzata per la visualizzazione del percorso del file
sPathFriendly = sPath
sPath = sPath & "\"
Else
sPathFriendly = Left(sPath, Len(sPath) - 1)
End If
' Viene determinato il nome del file
sFile = txtUpload.PostedFile.FileName
sSplit = Split(sFile, "\")
sFile = sSplit(Ubound(sSplit))
sFullPath = sPath & sFile
Try
txtUpload.PostedFile.SaveAs(sFullPath)
lblRisultato.Text = "Caricamento del file " & sFile & " to " & sPathFriendly & " avvenuto con successo!"
Catch Ex as Exception
lblRisultato.Text = "Errore nel caricamento del file " & sFile & " to " & sPathFriendly & ", per il seguente motivo: " & Ex.Message
Finally
lblRisultato.Font.Bold = True
lblRisultato.Visible = True
End Try
End Sub
</script>

