Programmazione Web » Asp.NET » Upload di un file con Asp.net

Upload di un file con Asp.net

Difficoltà: Intermedio Scritto da Andrea Benaglio
Sito Web: http://www.dotnetit.com E-Mail
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>

Aggiungi questo tutorial ai preferiti! Aggiungi questo tutorial ai preferiti


SEGNALA QUESTA RISORSA AD UN AMICO
Tuo nome
Tua mail
Nome amico
Mail tuo amico
Google
AREA UTENTI
E-MAIL PASSW
Perso la password?
I TUTORIAL PIU' LETTI
GIF ANIMATE
Script Gratis!
Spot

Sito Service
Tutorial per realizzare un sito web partendo da zero e script Asp per Aruba Server.

Tutorials & scripts
Articoli su HTML, CSS, PHP, ASP, Javascript, MySQL a cura di AG web solutions!

Guida Prestiti e Carte di credito
Giochi flash free
Giochi gratis online
Ricette di cucina gratis
Migliori torrent italiani
Notizie Dieta e Diete Alimentari

Cerca con Google