cod download

[david dias 0]

Pessoa bom dia ,

 

Bom vamos lá gostaria de ajuda com codigo para download , eu quero listar os aquivos de uma pasta de upload e baixar usando um codigo asp para download.

Eu usei esse codigo aqui para donwloado postado nesse forum

<%        
Response.Buffer = True        
Response.Clear                
' definir o diretório que contém os arquivos aqui        
strFileName = Server.MapPath( "/set/path/here/" & Request.QueryString( "file" ) )                
Set Sys = Server.CreateObject( "Scripting.FileSystemObject" )        
Set Bin = Sys.OpenTextFile( strFileName, 1, False )        
If Sys.FileExists( strFileName ) Then                                
'  Defina o nome de arquivo para salvar como                
Call Response.AddHeader( "Content-Disposition", "attachment; filename=" & trFileName )                                
' Certifique-se de downloads do navegador, em vez de executá-lo                
Response.ContentType = "application/octet-stream"                                
' Enviar como um binário Byte Stream                
While Not Bin.AtEndOfStream                       
Response.BinaryWrite( ChrB( Asc( Bin.Read( 1 ) ) ) )                
Wend        
Else                
Response.Redirect( "erro.html" )        
End If        
Bin.Close : Set Bin = Nothing        
Set Sys = Nothing
%>

mais estar aparencendo o seguinte erro

 

 

Server.MapPath() erro 'ASP 0172 : 80004005'

 

Caminho Inválido

 

/download.asp, line 13

 

O parâmetro Path do método MapPath deve ser um caminho virtual. Foi usado um caminho físico.

[jrcardozo 4]

faça assim

Server.MapPath( "/set/path/here/") & Request.QueryString( "file" )

não pode ter um valor diferente de uma constante atribuido dentro do mappath

[david dias 0]

Continua dando erro

 

Server.MapPath() erro 'ASP 0172 : 80004005'

 

Caminho Inválido

 

/download.asp, line 13

 

O parâmetro Path do método MapPath deve ser um caminho virtual. Foi usado um caminho físico.

[Ted k' 126]

veja assim:

strFileName = Server.MapPath("set/path/here/"&Request.QueryString("file"))

agora caso nao resolva, melhor é dar um response.write no Request.QueryString("file"), saber o que ele está vindo e ter certeza de que esse caminho está correto!

[david dias 0]

Dei um reponse e ví que o caminho esta certo

obs eu não estou usando banco só caminho fisico mesmo (pastas) será que é esse o erro

[Patrique 0]

Faz assim

strFileName = Server.MapPath("set/path/here/" + Request.QueryString("file"))

[jrcardozo 4]

coloque a barra invertida. caminho fisico é ao contrario

[david dias 0]

Pessoal me desculpem pela demora em responder, fiz tudo q vcs me falaram botei barra / \ revi o caminho e tava ok mais nada adiantou caso vs tenhão augun cod que lista os aquivos dentro de uma pasta no servidor e possa fazer donwload por favor me passem muito obrigado palas respostas.