Como Fazer Upload De Arquivo Em Asp

[Guest tiago goncalves]

Como fazer Upload de arquivo em asp para um banco de dados como access por exemplo.

se tiver algum exemplo , por favor me envie.

tiagogoncalvesb@bol.com.br :(

[hara]

Existem diversos componentes para fazer upload em ASP, precisa ver o que o seu servidor possui...

Vou postar o exemplo de uso do DundasUpload, um dos mais comuns:

<%
Response.Buffer = true
on error resume next

'declara as variáveis
dim objUpload
dim strMessage

'cria instância do objeto
set objUpload = server.CreateObject("Dundas.Upload.2")

'verifica um possível erro
if err.number <> 0 then
Response.Redirect "Dundas.asp?Message=" & err.description
end if

'estipula o tamanho máximo do arquivo
objUpload.MaxFileSize = 1048576 

'formatando o nome do arquivo
objUpload.UseUniqueNames = false

'informa o path onde os arquivos serão salvos
'obs: o diretório deve ter permissão de escrita
objUpload.Save "e:home\xyz\web\teste"

dim temp

'verifica erro
if IsEmpty(objUpload.Form("txtName")) = false then temp = " "
if err.number <> 0 then
strMessage = objUpload.Form("txtName") & temp & "Falha, ocorreu o erro: " & err.description

'mensagem de sucesso
else
strMessage = "Upload realizado com sucesso pelo" & temp & objUpload.Form("txtName") & "."
end if 

Response.Redirect "Dundas.asp?Message=" & strMessage

'destroi o objeto
set objUpload = nothing
%>

Se precisar de código de outro componente, posta ae !

Fernando Hara