Ir para conteúdo

POWERED BY:

Arquivado

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

bimpercursso

Erro simples...

Por , em ASP Clássico

Recommended Posts

bimpercursso    0

bimpercursso
Postado

aew pessoal, nao consigo encontrar onde esta errado nisso, muito simplesestou usando o dundas upload, nao da erro nenhum mas as imagens nao vai para a pasta correta, ai vai o codigo para vcs darem uma olhada:

 

formulario:

<html><body bgcolor="#FFFFFF">	 <form method="POST" enctype="multipart/form-data" action="upload.asp">		  <input type="FILE" size="40" name="FILE1"><br>		  <input type="FILE" size="40" name="FILE2"><br>		  <input type="FILE" size="40" name="FILE3"><br>	 <input type=submit value="Upload!">	 </form></body></html>

 

agora o asp:

 

<%Dim objUploaddim objUploadedFileSet objUpload = server.CreateObject("Dundas.Upload.2")objUpload.UseVirtualDir = True'esta linha abaixo faz com que o Dundas não altere o nome do arquivo quando fizer o uploadobjUpload.UseUniqueNames = falseobjUpload.Save "\imagens"For Each objUploadedFile in objUpload.Filesnomearquivo = Right(objUploadedFile.path,Len(objUploadedFile.path)-InstrRev(objUploadedFile.path,"\")) & "<BR>"NextSet objUpload = nothing%>

 

alguma sugstao

Compartilhar este post

Link para o post
Compartilhar em outros sites

bimpercursso    0

bimpercursso
Postado

quando jogo o arquivo para o servidor ele da esse erro

 

 

Dundas.Upload.2 error '80004005' Can't open file for writing. /dundas/upload.asp, line 8

ja dei a permissao de pasta e ano sei mai o que fazer...

Compartilhar este post

Link para o post
Compartilhar em outros sites

jothaz    1

jothaz
Postado

Post o erro aê para ficar mais fácil de ajudá-lo.Se puder identificar a linha em que ocorre o erro é melhor.t+

Compartilhar este post

Link para o post
Compartilhar em outros sites

jothaz    1

jothaz
Postado

Nunca usei esta componente mas tente trocar:

objUpload.Save "\imagens"For Each objUploadedFile in objUpload.Filesnomearquivo = Right(objUploadedFile.path,Len(objUploadedFile.path)-InstrRev(objUploadedFile.path,"\")) & "<BR>"Next

Para:

For Each objUploadedFile in objUpload.Files		 nomearquivo = Right(objUploadedFile.path,Len(objUploadedFile.path)-InstrRev(objUploadedFile.path,"\")) & "<BR>"		 objUpload.Save "\imagens\" & nomearquivo 	Next

 

Foi o que puder notar.. o comando objUpload.Save "\imagens" não esta especificando o nome do arquivo.

 

t+

Compartilhar este post

Link para o post
Compartilhar em outros sites

jothaz    1

jothaz
Postado

Mesmo depois que você alterou para:

For Each objUploadedFile in objUpload.Files		 nomearquivo = Right(objUploadedFile.path,Len(objUploadedFile.path)-InstrRev(objUploadedFile.path,"\")) & "<BR>"		 objUpload.Save "\imagens\" & nomearquivo	Next

Acontece o erro:

Dundas.Upload.2 error '80004005'Can't open file for writing.

 

Na mesma linha?

 

Para facilitar sempre post o erro pq sem ver o que esta acontecendo fica dificil.

 

você têm o exemplo de como usar este componente?

 

t+

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