fazer download de mp3

[rafa-martin 2]

estou tentando fazer download de arquivo mp3. estou usando o código abaixo. porém, o download está sendo feito errado,pois o arquivo no servidor tem mais de 3 mega e quando salvo na minha máquina o tamanho do arquivo está de 0 kb.

 

qual é o erro? o que falta?

 

 

<%
musica = request("musica")
dir = "diretorio_servidor"
 
call download(musica, dir)
 
public function download(arquivo, pasta)
dim objStream
set objStream = server.createObject("ADODB.Stream")
with (response)
.buffer = true  
.addHeader "Content-Type","application/x-msdownload"
.addHeader "Content-Disposition","attachment; filename="&arquivo  
.flush  
end with
with (objStream)
.open  
.type = 1  
.loadFromFile server.mapPath(pasta&"/"&arquivo)
end with
response.binaryWrite objStream.read
set objStream = nothing
response.flush
end function
%>

[xanburzum 169]

ele gera algum erro ???

verifique se o caminho está correto.

e dê uma olhada no fórum, pois eu coloquei alguns exemplos de downloads, inclusive com opções de gerenciamento