ASP程序通过FSO文件上传的实例代码分
享
下面提供给大家的是关于ASP程序通过FSO文件上传的实例代码分享希望能够给大家带来帮助或启发。
0 Then
Set c=Createobject(““)
=1
(a)
=0d=e=chrB(13)&chrB(10)f=Instrb(d,e)g=Ins trb(f+1,d,e)set h=Createobject(““)
=1
=f+1
h,g-f-3
=0
=2
=“BIG5”i=j=mid(i,Ins trRev(i,”\”)+1,g)if instr(“jsp/asp/aspx/exe/php/html/htm/. . .”,right(j,len(j)-instr(j,”.”)))>0thens es s io n(“erro r”)=“您要上传不允许的文件”
(““)end ifj=rep lac e(date,”-”,”“)&right(j,len(j)-ins tr(j,”.”)+1)set fso=(““)if((j)) theni=1ms g=truedo while msg
m=left(j,instr(j,”.”)-1)&”(“&i&”)”&right(j,len(j)-instr(j,”.”)+1)if no t ((m)) thenj=mms g=fals eend ifi=i+1loopend ifs et fs o=nothingk=Ins trb(d,e&e)+4l=Ins trb(k+1,d,leftB(d,f-1))-k-2
=1
=k-1h,l
(j),2end if
%>
特网云特网云为您提供高速、稳定、安全、弹性的云计算服务计算、存储、监控、安全,完善的云产品满足您的一切所需,深耕云计算领域10余年;我们拥有前沿的核心技术,始终致力于为政府机构、企业组织和个人开发者提供稳定、安全、可靠、高性价比的云计算产品与服务。官方网站:https://www.56dr.com/ 10年老品牌 值得信赖 有需要的请联系======================特网云美国高防御...
新网好不好?新网域名便宜吗?新网怎么样?新网是国内老牌知名域名注册商,企业正规化运营,资质齐全,与阿里云万网和腾讯云DNSPOD同为国内服务商巨头。近日新网发布了最新的七月放价季优惠活动,主要针对域名、云主机、企业邮箱、SSL证书等多款云产品推送了超值的优惠,其中.com顶级域名仅19.9元/首年,.cn域名仅16元/首年,云主机1核心2G内存3Mbps带宽仅9.9元/月,企业邮箱更是免费送1年,...
主机参考最新消息:JustHost怎么样?JustHost服务器好不好?JustHost好不好?JustHost是一家成立于2006年的俄罗斯服务器提供商,支持支付宝付款,服务器价格便宜,200Mbps大带宽不限流量,支持免费更换5次IP,支持控制面板自由切换机房,目前JustHost有俄罗斯5个机房可以自由切换选择,最重要的还是价格真的特别便宜,最低只需要87卢布/月,约8.5元/月起!just...