Suporte > Base de Conhecimento > Componentes ASP > Como fazer upload de arquivos usando o Persists AspUpload


Como fazer upload de arquivos usando o Persists AspUpload




O AspUpload é um componente ActiveX que permite o envio de qualquer tipo de arquivo ou imagem para uma pasta no servidor web.

AspUpload.html

<html>
<head>
<title>AspUpload : Upload Simples</title>
</head>
<body>

<h4>AspUpload</h4>

<b>Select 1, 2 or 3 files, then click the Upload button. Images (.gif, .jpg, .png) will be automatically displayed.</b>

<p>
<form name="MyForm" method="post" enctype="multipart/form-data" action="AspUpload.asp">
<table cellspacing="0" cellpadding="3" border="1">
<tr>
<td bgcolor="#FFFFCC">
<input type="file" size="40" name="filefield" /><br />
<input type="submit" value="Upload" /><br />
</td>
</tr>
</table>
</form>
</p>

</body>
</html>

AspUpload.asp

<%
' Cria uma instância do controle
Set AspUpload = Server.CreateObject("Persits.Upload.1")
' Não sobrevescrever arquivos
AspUpload.OverwriteFiles = False

On Error Resume Next
' Limita o tamanho máximo do arquivo em 1MB
AspUpload.SetMaxSize 1048576
' Salva o arquivo
Count = AspUpload.Save("c:\upload\")

' Tira o objeto da memória
Set AspUpload = Nothing

If Err <> 0 Then
Response.Write "Erro. " & Err.Description
Else
Response.Write "Upload realizado com sucesso."
End If
%>


Esta resposta lhe foi útil?

Imprimir este Artigo Imprimir este Artigo

Veja também
Como enviar email com o Cdosys (Visualizações: 2221)
Como utilizar o AspEmail - Persits (Visualizações: 1341)