asp下载时重命名上传文件新下载文件名的实现代码

问题：我想上传文件时，我改变它的名字，然后改变名称回来时，我下载它。
如：我上传一张我的图片上传到系统编号名称20040302001.jpg下载回我的照片.jpg
数据库用于保存旧的和新的文件名。
下载时无法获得下载的名称。

代码uff1a
复制代码代码如下所示：
<
函数DL（f，n）
下次继续出错
集合S = CreateObject（ADODB。流）
模式= 3
号= 1
美国公开赛
s.loadfromfile（F）
如果错误，数字> 0
响应。状态=404
其他的
响应。ContentType =应用/字节流
response.addheader 的内容配置：
范围=中（request.servervariables（http_range ），7）
如果范围然后
response.binarywrite（s.read）
其他的
的立场= CLNG（分（范围，）（0））
response.binarywrite（s.read）
最后如果
最后如果
反应结束
端功能
%>

函数使用示例：
复制代码代码如下所示：
调用DL（server.mappath（下载 / 20040302001。jpg），我的照片.jpg）