Problemas Com O Dundas

[Guest Pablo]

Olá Galera !

Gostaria de saber porque quando faço o upload de uma imagem no Dundas, na página de confirmação minha de upload ao invez de aparecer o nome da foto somete, aparece antes isso:

{00C91B85-2BFC-4D75-8C02-C7F8A5E254F4}_nomedafoto.jpg

E na apsta dela tb é salva assim......o está errado.

[mariofdf]

prostre o codigo para vermos aonde esta o erro

[cyberalexxx]

Na documentação do Dundas, tem como pegar o nome do arquivo, não te passo agora pois não tenho ele aki em casa, só no pc do trampo.

[Guest Pablo]

Ai vai o meu código, verifiquem o q esta acontecendo, e andei vendo na doc do Dundas não está bem claro como fazer........

<%
on error resume next
Set objUpload = Server.CreateObject("Dundas.Upload.2")
objUpload.UseVirtualDir = false
objUpload.Useuniquenames = false
objUpload.MaxFileSize = 3048576
objUpload.Save "e:\home\aerostarleme\web\imagens\avioes"
Set FSO = Server.Createobject("Scripting.FilesystemObject")
For Each File in objUpload.Files
path = File.Path
Next
file = FSO.GetFileName(path)
response.write (file)
%>

[cyberalexxx]

Tenta isso:

<%
on error resume next
Set objUpload = Server.CreateObject("Dundas.Upload.2")
objUpload.UseVirtualDir = false
objUpload.Useuniquenames = false
objUpload.MaxFileSize = 3048576
objUpload.Save "e:\home\aerostarleme\web\imagens\avioes"
Set FSO = Server.Createobject("Scripting.FilesystemObject")
For Each File in objUpload.Files
path = File.OriginalPath
Next
file = FSO.GetFileName(path)
response.write (file)
%> 

[Guest Guest]

Praticamente funcionou, pois esta mantendo o nome original na pasta, só q na página antes do nome está aparecendo o seguinte:

CODE nome_do_aqruivo.xxx

[Guest Pablo]

Quanto ao erro anterior já corrigi, mas quando faço o upload de mais deuma foto, ele aparece somente o nome de uma foto........

[cyberalexxx]

Quanto ao erro anterior já corrigi, mas quando faço o upload de mais deuma foto, ele aparece somente o nome de uma foto........

Coloque o response.write dentro do For/Each

[Guest Guest]

Ok, vou fazer isto.....

[Guest Pablo]

Eu coloquei o response.write logo após o For each, só q agora nem aparece o nome dos arquivos......mas eles estão sendo inseridos na pasta si, só q o nome....

[cyberalexxx]

Voce fez isso?

<%
on error resume next
Set objUpload = Server.CreateObject("Dundas.Upload.2")
objUpload.UseVirtualDir = false
objUpload.Useuniquenames = false
objUpload.MaxFileSize = 3048576
objUpload.Save "e:\home\aerostarleme\web\imagens\avioes"
Set FSO = Server.Createobject("Scripting.FilesystemObject")
For Each File in objUpload.Files
    path = File.OriginalPath
    file = FSO.GetFileName(path)
    response.write (file) & "<br>"
Next
%> 

[Guest Guest]

Pessoal agradeço em muito pela ajuda, finalmente de tudo certo aki.........valeu mesmo mais uma vez........