文件上传问题,谢谢

xmanvictor 2003-11-07 10:38:01
使用lyfupload组件如何获得当前文件的文件名
例如要将客户机上的c:\111.dbf上传到服务器上,在服务器上保存为
d:\upload\filename.dbf
这个filename为提交时间和原文件名的组合,如何获得原来的文件名呢,谢谢
...全文
29 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
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就是原文件名

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧