懂你所需,做你所想
当前位置:首页 > 新闻资讯 > 网站建设 > ASP无组件上传图片代码

ASP无组件上传图片代码

发表日期:2010-2-9 9:39:05文章编辑:合肥搜联广告设计浏览次数:

    现在做网站我想不上传图片是不可能的了。但上传图片一也是最危险的一漏洞。我一直用下面的这样的代码,目前为止很少有被上传木马的(我不敢说不会有漏洞,哈哈。。。)

代码如下:

 formPath="/fileupload/"
 for each formName in upload.objFile 
  set file=upload.file(formName)
  if file.FileSize>0 then
   if file.FileSize>204800 then
    call errormsg("您上传的文件大于规定大小(200K),请改变文件大小后再进行上传。")
   else
    if ucase(right(File.FileName,4))<>".JPG" and ucase(right(File.FileName,4))<>".GIF" then
     call errormsg("对不起,你上传文件格式不对。只能上传JPG和GIF格式。")
    else
     FileName=gsid&MakedownName()&"."&mid(file.FileName,InStrRev(file.FileName, ".")+1)
     file.SaveAs Server.mappath(formPath&FileName)
     picture=formPath&FileName
     sy_chemm(picture)
     subjpg(picture)
     iCount=iCount+1
    end if
   end if
   set file=nothing
  else
   picture=""
  end if
 next

以上代码用的是化境HTTP上传程序 Version 2.0,这个程序你可以在附件中下载。
相关新闻

使用asp代码突破163相册的

  ...

日期:2010-2-8 10:17:49 浏览次数:45

两种比较典型的ASP木马防范方

随着ASP 技术的发展,网络上基于ASP技术开发的网站越来越...

日期:2010-2-8 10:18:52 浏览次数:34

解决Jmail发送邮件标题出现

今天在做JMAIL发邮件的时候,接收到的邮件标题全是乱码,经在BAID...

日期:2010-2-8 10:19:37 浏览次数:47

ASP无组件上传图片代码

现在做网站我想不上传图片是不可能的了。但上传图片一也是最危险的一漏洞。...

日期:2010-2-9 9:39:05 浏览次数:41

ASP 中select cas

select case 是当一个值有多种判断情况时...

日期:2010-2-9 9:40:07 浏览次数:58

ASP链接SQL代码

<% ’on error resume&nb...

日期:2010-2-9 9:40:59 浏览次数:42