Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

danilo.rp

Upload de images

Por , em ASP Clássico

Recommended Posts

danilo.rp    0

danilo.rp
Postado

Ola tudo bem gostaria de saber se alguen sabe como fazer upload de images sem precisar de instalar programa ou dll, no caso minha pasta se chama "upload" o que fazer.

Compartilhar este post

Link para o post
Compartilhar em outros sites

bydumoraes    0

bydumoraes
Postado

coloca esses arquivos na pasta /upload

 

uploadimage.asp

 

<form method="post" action="imageupload.asp" enctype="multipart/form-data">

<p align="center">

<font face="Verdana" size="1"> Inserir imagem para divulgação.</font></p>

<table border="0" cellspacing="1" width="100%" id="AutoNumber3">

<tr>

<td width="100%">

<p align="center">

<input type="file" name="image1" size="20" class="caixa"></td>

</tr>

</table>

<p align="center">

<input type="submit" value="OK" name="submit" class="caixa"></p>

</form>

 

 

-----------------

 

imageupload.asp

 

 

<% @Language="VBScript" %>

<%

Set theForm = Server.CreateObject("ABCUpload4.XForm")

theForm.Overwrite = True

Set theField = theForm("image1")(1)

If theField.FileExists Then theField.Save theField.FileName

%>

<html>

<body>

<b><font size="1" face="Verdana">Imagem transferida... </font></b>

<p> </p>

</body>

</html>

 

 

 

depois crie um link para chamar o form.

 

 

 

espero ter ajudado.

Compartilhar este post

Link para o post
Compartilhar em outros sites

danilo.rp    0

danilo.rp
Postado

cara obrigado mesmo so que esta dando erro.

Objeto Server erro 'ASP 0177 : 800401f3'

 

Falha em Server.CreateObject

 

/igreja/upload/imageupload.asp, line 3

 

ProgID inválido. Para obter informações adicionais específicas sobre esta mensagem, visite o site Microsoft Online Support localizado em: http://www.microsoft.com/contentredirect.asp (site em inglês).

Compartilhar este post

Link para o post
Compartilhar em outros sites

bydumoraes    0

bydumoraes
Postado

seu servidor naum deve aceitar o tipo de objeto, substitua o arquivo por esse:

 

 

 

imageupload.asp

 

<%

Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

 

mySmartUpload.AllowedFilesList = "htm,txt,jpg,gif,png"

mySmartUpload.DeniedFilesList = "exe,bat,asp"

mySmartUpload.MaxFileSize = 50000

mySmartUpload.TotalMaxFileSize = 200000

mySmartUpload.Upload

 

' coloca o caminho virtual fornecido pelo seu servidor, no meu caso é esse

' ele vai colocar as imagens ou qualquer arquivo nesta pasta

 

intCount = mySmartUpload.Save("d:\web\user\htdocs\pasta\images")

 

 

 

If Err Then

Response.Write("<b>Erro : </b>" & Err.description)

Else

Response.Write(intCount & " arquivo(s) enviado(s).")

End If

%>

 

 

testa ai agora se funcionar legal, caso contrario você tem que pedir pro seu servidor o componente que eles usam.

 

valeu?

Compartilhar este post

Link para o post
Compartilhar em outros sites

danilo.rp    0

danilo.rp
Postado

Ola tudo bem gostaria de saber se alguen sabe como fazer upload de images sem precisar de instalar programa ou dll, no caso minha pasta se chama "upload" o que fazer.

Obrigado Funcionou beleza.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito