JTBC(CMS)

开源与免费的跨平台网站内容管理系统解决方案

腾讯交流群: 2254994
技术支持群: 27032719
首页 » 在线论坛 » ASP版本 
帖子内容
1 楼
qeexuan
注册会员
积分 44
注册 2010-08-06
     
关于上传|下载命名的问题
ASP问题:在做JTBC的下载功能是,客户要求下载到本地的文件不用上传时系统按时间自动生成的文件名(如:1152ck),想要上传之前的文件名(如:office软件),我想到的办法是在上传时不自动命名,就保存文件的原名,可这样会出现重复的文件名的问题。哪位大虾还有其他的方法?
2010-08-20 11:15:33 www.vike8.net
2 楼
jetiben
管理员
积分 7082
注册 2006-06-28
     
回复: 关于上传|下载命名的问题
你可以存储为自动生成的名字,但当下载时使用 asp 程序转接输出为上传的时候的文件名就可以了。
2010-08-20 22:45:07
3 楼
qeexuan
注册会员
积分 44
注册 2010-08-06
     
回复: 关于上传|下载命名的问题
主要是在程序接受表单的file 后就会出现乱码,咱们的上传upload.asp 对中文名上传有影响吗?
2010-08-25 10:23:23 www.vike8.net
4 楼
qeexuan
注册会员
积分 44
注册 2010-08-06
     
网上看到这么一片关于改名的,大家看靠谱不。
问题:我想上传文件时后改名,下载时又将名改回来。
如:我上传一张“我的照片.jpg”上传后改为系统数名“20040302001.jpg”下载时又改回“我的照片.jpg”
其中的保存新旧文件名都用数据库(已做)
就是下载时的改名做不出来。
<%
function  dl(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
    Range=Mid(Request.ServerVariables( "HTTP_RANGE "),7)
    if  Range= " "  then
      Response.BinaryWrite(S.Read)
    else
      S.position=Clng(Split(Range, "- ")(0))
      Response.BinaryWrite(S.Read)
    End  if
end  if
Response.End
end  function
%>

call  dl(Server.MapPath( "download/20040302001.jpg "), "我的照片.jpg ")
本帖由 qeexuan 于 2010-08-25 10:28:19 编辑过
2010-08-25 10:27:52 www.vike8.net