Mai qnd envio o arquivo a janela é para sumir e anexar o arquivo no campo da outra janela.
apreseanta esse esrro:
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/holifarma/curriculum/Aspupload.asp, line 17
CODIGO
<% Dim objUpload Set objUpload = Server.CreateObject("Dundas.Upload.2") objUpload.Save(Server.MapPath("/curriculum/")) objUpload.MaxFileSize = 10000000 objUpload.UseVirtualDir = False objUpload.UseUniqueNames = True %> <%= Count %> <FONT SIZE="1" FACE="ARIAL">ARQUIVO ENVIADO <% Set FSO = CreateObject("scripting.FileSystemObject") Set Folder = FSO.GetFolder("/curriculum/") Set Files = Folder.Files %> <% For each objUploadedFile In Upload.Files arquivo = objUploadedFile.ExtractFileName response.Write(": " & objUploadedFile.ExtractFileName) seq = seq + 1 Next 'criei uma session para armazenar o no do arquivo session("arquivo") = arquivo if session("arquivo") <> "" then response.redirect "index.asp" end if %>