Chinaunix首页 | 论坛 | 博客
  • 博客访问: 26278767
  • 博文数量: 2065
  • 博客积分: 10377
  • 博客等级: 上将
  • 技术积分: 21525
  • 用 户 组: 普通用户
  • 注册时间: 2008-11-04 17:50
文章分类

全部博文(2065)

文章存档

2012年(2)

2011年(19)

2010年(1160)

2009年(969)

2008年(153)

分类: 系统运维

2009-01-12 09:12:03

刚才我们总结了如何可以通过无组件类进行上传操作,那现在我们来总结一下如何通过组件上传功能呢?
第一步:将我们的上传组件注册到系统中去
第二步:写代码实现功能
Set oFileUp = Server.CreateObject("SoftArtisans.FileUp")  '建立上传对象
ContentTpye = trim(oFileUp.Form("FileName").contentType)  '取出来文件类型
《其中的FileName表示的是表单中的File类型的名称》

'提取出来这个表单项中的文件流类型
if ContentTpye<>"image/x-png" and  ContentTpye<>"image/gif" and ContentTpye<>"image/bmp" and ContentTpye<>"image/pjpeg" and ContentTpye<>"image/jpeg" then
        response.Write "文件类型不正确[只能是.bmp,.jpg,jpeg,.gif,.png格式]"
        oFileUp.Flush
        response.End
    end if
    if oFileUp.Form("FileName").TotalBytes > MaxBytes then  '这个文件的字节大小
        response.Write "文件超过限制不能上传!"
        oFileUp.Flush
        response.End
    end if
small=now()
small=hour(small)&minute(small)&second(small)&cstr(fix(rnd*10000))
small=small& Right(ShortFilename,4)
saveMapPath=server.MapPath("/UploadFiles/"&small&"")
oFileUp.Form("FileName").SaveAs saveMapPath    '将文件保存到服务器上面去了!
提取上传表单中的内容是这样来处理的:
oFileUp.form("select")
可以得到上传表单中的名为
相对于无组件上传来说有组件要方便许多哦!

阅读(798) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~