无惧上传类bug修改

无惧上传类bug修改

ID:12865770

大小:16.13 KB

页数:12页

时间:2018-07-19

无惧上传类bug修改_第1页
无惧上传类bug修改_第2页
无惧上传类bug修改_第3页
无惧上传类bug修改_第4页
无惧上传类bug修改_第5页
资源描述:

《无惧上传类bug修改》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、无惧上传类上传路径问题修改本人在一次开发中碰到图片无法上传问题,经调试找出无惧类里面有个地方有点问题。问题描述:图片上传报错问题解释:无惧类里面是用tmpPath=Split(Path,".")(0)获取上传路径及文件名,问题就出在split上。我服务器路径命里面有个.,由于split是截取数组,而这里是用截取后数组0下表这个变量和文件后缀拼接,这样就拼接不成完整的路径和文件名。解决方法:我用tmpPath=left(Path,InStrRev(Path,".")-1)这个来代替split获取路径和文件名,这样就获取到了完整的路径及文件名。如果有朋友能有更好的解决方法请与本人分享,谢

2、谢!本人QQ:289060636再此本人感谢此无惧上传类的作者梁无惧的分享!<%diminputname,immediate,attachdir,dirtype,maxattachsize,upext,msgtypeinputname="filedata"'表单文件域nameattachdir="/upload/xh"'上传文件保存路径,结尾不要带/dirtype=1'1:按天存入目录2:按月存入目录3:按扩展名存目录建议使用按天存maxattachsize=204800'最大上传大小,默认是200kupext="txt,rar,zip,jpg,jpeg,gif,png,swf,wm

3、v,avi,wma,mp3,mid"'上传扩展名msgtype=2'返回上传参数的格式:1,只返回url,2,返回参数数组immediate=Request.QueryString("immediate")'立即上传模式,仅为演示用dimerr,msg,upfileerr=""msg="''"setupfile=newupfile_classupfile.AllowExt=replace(upext,",",";")+";"upfile.GetData(maxattachsize)ifupfile.isErrthenselectcaseupfile.isErrcase1err="无数

4、据提交"case2err="文件大小超过"+cstr(maxattachsize)+"字节"caseelseerr=upfile.ErrMessageendselectelsedimattach_dir,attach_subdir,filename,extension,target,tmpfileextension=upfile.file(inputname).FileExtselectcasedirtypecase1attach_subdir="day_"+DateFormat(now,"yymmdd")case2attach_subdir="month_"+DateFormat(

5、now,"yymm")case3attach_subdir="ext_"+extensionendselectattach_dir=attachdir+"/"'生成随机文件名并改名Randomizetimerfilename=DateFormat(now,"yyyymmddhhnnss")+cstr(cint(9999*Rnd))+"."+extensiontarget=attach_dir+filenametmpfile=upfile.SaveToFile(inputname,Server.mappath(target))ifimmediate="1"thentarget="!"+

6、targettarget="!"+targettarget=jsonString(target)ifmsgtype=1thenmsg="'"+target+"'"elsemsg="{'url':'"+target+"','localname':'"+jsonString(upfile.file(inputname).FileName)+"','id':'1'}"endifendifsetupfile=nothingresponse.write"{'err':'"+jsonString(err)+"','msg':"+msg+"}"functionjsonString(str)str=

7、replace(str,"","\")str=replace(str,"/","/")str=replace(str,"'","'")jsonString=strendfunctionFunctionIif(expression,returntrue,returnfalse)Ifexpression=trueTheniif=returntrueElseiif=returnfalseEndIfEndFunctionfunctionDateFormat

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。