asp问题：下载时如何更换文件名

譬如下载链接为 " http://zhidao.baidu.com/aaa.doc "
我希望下载到桌面的是 " 中国.doc "

请高手指点，具体代码最好 3Q

就是把原链接的文件名下载后改名，服务器上的不要改

function download(f,n)  
  'f文件全路径，n下载文件的文件名  
  on error resume next  
  Set S=CreateObject("Adodb.Stream")  
  S.Mode=3  
  S.Type=1  
  S.Open  
  S.LoadFromFile(f)  
  if Err.Number>0 then  
  Response.status="404"  
  else  
  Response.ContentType="application/octet-stream"  
  Response.AddHeader "Content-Disposition:","Attachment;filename="&n  
  if Range="" then  
  Response.BinaryWrite(S.Read)  
  else  
  S.Postion=Clng(Split(Range,"-")(0))  
  Response.BinaryWrite(S.Read)  
  end if  
  End if  
  Response.end  
  end function 
if request("Path")<>"" and request("Name")<>"" then 
  call download(request("Path"),request("Name"))
end if

function download(f,n)  
  'f文件全路径，n下载文件的文件名  
  on error resume next  
  Set S=CreateObject("Adodb.Stream")  
  S.Mode=3  
  S.Type=1  
  S.Open  
  S.LoadFromFile(f)  
  if Err.Number>0 then  
  Response.status="404"  
  else  
  Response.ContentType="application/octet-stream"  
  Response.AddHeader "Content-Disposition:","Attachment;filename="&n  
  if Range="" then  
  Response.BinaryWrite(S.Read)  
  else  
  S.Postion=Clng(Split(Range,"-")(0))  
  Response.BinaryWrite(S.Read)  
  end if  
  End if  
  Response.end  
  end function 
if request("Path")<>"" and request("Name")<>"" then 
  call download(request("Path"),request("Name"))
end if

刚刚听一个朋友说这种办法几乎不行，只能上传中文文件名

回复了两次，没有显示出来。csdn 今天大姨妈来了。

的确，今天CSDN似乎出问题了，法问题会出现好几个