文件上传问题,谢谢

xmanvictor 2003-11-07 10:38:01
使用lyfupload组件如何获得当前文件的文件名
例如要将客户机上的c:\111.dbf上传到服务器上,在服务器上保存为
d:\upload\filename.dbf
这个filename为提交时间和原文件名的组合,如何获得原来的文件名呢,谢谢
...全文
9 4 打赏 收藏 举报
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
hozi 2003-11-07
filename="file1"
path=server.MapPath("../pic")
Set obj = Server.CreateObject("LyfUpload.UploadFile")
'txt = obj.request("text1") '得到form元素的值
obj.extname="gif,jpg,bmp"
obj.maxsize=100000
'Response.Write( "文本框1的输入值是: " & txt)
Response.Write "<br>"

aa=obj.filetype("file1") '获得原文件名
'上载后文件重命名,使用变量方式
if instr(aa,"gif") then
varfname=session("Pusername") & ".gif" '重命名
elseif instr(aa,"bmp") then
varfname=session("pusername") & ".bmp"
elseif instr(aa,"jpeg") then
varfname=session("pusername") & ".jpg"
end if
  • 打赏
  • 举报
回复
xmanvictor 2003-11-07
谢谢
  • 打赏
  • 举报
回复
jhysky 2003-11-07
上传的时候会有一个<inpu type=file name=file1 value=上传>的按钮,表单提交后可通过ASP得到客户端目录及文件名,另外在客户端也可以得到具体的路径和文件名。如:
alert (document.all.file1.value);
  • 打赏
  • 举报
回复
qiangtian 2003-11-07
aa=obj.FileType ("file" & i & "")
filename="file" & i & ""
varfname=""
strPath=server.MapPath("../upload/image/")

ss1=obj.SaveFile (filename,strPath,true,varfname)
hz=len(ss1)-instr(1,ss1,".")
hz=right(ss1,hz)
Srvfile="" & ID & "_" & cstr(i) & ""
ss=Srvfile&"."&hz
yy=obj.savefile(filename,strPath,true,ss)

yy就是原文件名
  • 打赏
  • 举报
回复
相关推荐
发帖
ASP
加入

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2003-11-07 10:38
社区公告
暂无公告