Upload de arquivos

Como fazer um upload de arquivos em ASP.NET

Fabricante: Microsoft
Documentação: http://msdn.microsoft.com/en-us/library/aa478971.aspx

Exemplo de implementação:



<%@ Page Language="vb" %>
<html>
   <Script Language="VB" RunAt="Server">
        ' Configura qual a pasta do servidor os arquivos serão salvos.
'Não terminar o caminho com \ 

        Dim sPasta as String = "C:\ServerFolder" 

        Sub Page_Load(Sender as Object, e as EventArgs)
            Dim oPasta as string
            'Verifica se a pasta existe, se não existe cria.
            oPasta = Dir(MyPath, vbDirectory) 
            if oPasta="" Then 
                MkDir(sPasta)       
            end if  
        End Sub

         Sub Upload_Click(ByVal Sender As Object, ByVal e As EventArgs)
           'Valida o tamanho e as extenção dos arquivos permitidos
           Dim sExtencao As String = System.IO.Path.GetExtension(Arquivo.PostedFile.FileName)
           Dim iTamanho As Long = Arquivo.PostedFile.ContentLength
           If sExtencao = ".jpg" Or sExtencao = ".gif" Or sExtencao = ".jpeg" Or sExtencao = ".png" Then
               If iTamanho <= 102400 Then
                   ' Exibe os detalhes do arquivo que foi enviado
                   NomeArquivo.InnerHtml = Arquivo.PostedFile.FileName
                   ConteudoArquivo.InnerHtml = Arquivo.PostedFile.ContentType
                   TamanhoArquivo.InnerHtml = Arquivo.PostedFile.ContentLength
                   Detalhes.Visible = True

                   ' Recupera o nome do arquivo original
                   Dim strNomeArquivo As String
                   strNomeArquivo = Arquivo.PostedFile.FileName
                   Dim c As String = System.IO.Path.GetFileName(strNomeArquivo)
                   
                   ' Salva o arquivo na pasta de destino
                   Try
                       Arquivo.PostedFile.SaveAs(sPasta + c)
                       Span1.InnerHtml = "Seu arquivo foi enviado com sucesso para: " & sPasta & "\" & c
                   Catch Exp As Exception
                       Span1.InnerHtml = "Um erro ocorreu ao tentar salvar o arquivo: " & Exp.Message
                       Detalhes.Visible = False
                       Span2.Visible = False
                   End Try
               Else
                   Span1.InnerHtml = "Erro: Tamanho máximo do arquivo atingido, tamanho máximo 100k."
                   Detalhes.Visible = False
                   Span2.Visible = False
               End If
           Else
               Span1.InnerHtml = "Erro: Tipo de arquivo não permitido: " & sExtencao & "."
               Detalhes.Visible = False
               Span2.Visible = False
           End If
            
       End Sub
    </Script>
    <body>      
    <b>Enviando arquivos via Asp .Net</b>
    <p>                   
        <Form Method="Post"  EncType="Multipart/Form-Data" RunAt="Server">
            Selecione o arquivo que será enviado: <BR>
            <Input ID="Arquivo" Type="File" RunAt="Server" Size="40"> <BR><BR>
            <Input Type="Submit" Value="Upload" OnServerclick="Upload_Click" RunAt="Server">
            <P>
                <Div ID="Detalhes" Visible="False" RunAt="Server">
                    Nome do arquivo: <Span ID="NomeArquivo" RunAt="Server"/> <BR>
                    Conteúdo do arquivo: <Span ID="ConteudoArquivo" RunAt="Server"/><BR>
                    Tamanho do arquivo: <Span ID="TamanhoArquivo" RunAt="Server"/>bytes<BR>
                </Div>
                <Span ID="Span1" Style="Color:Red" RunAt="Server"/>
                <Span ID="Span2" Style="Color:Red" RunAt="Server"/>
            </P>
        </Form>
    </P>

   </Body>
</html>

Atenção: As instruções desta página são exclusivas para os Planos de hospedagem na plataforma ASP.NET.

Suporte

Tudo sobre .NET Framework

Upload de arquivos

Como fazer um upload de arquivos em ASP.NET

Contrate já e tenha até 60 dias gratis para testar!