asp无惧上传类(asp网页上传类代码)v2.2 最终版

asp无惧上传类介绍：

无惧上传类是一款经典的ASP上传类，有近八成的ASP程序正在使用它作为WEB文件上传程序，包括图片上传，特点是执行效率高，使用方便，直到现在还很受欢迎，因此这里就把它放上来，供大家下载使用，这是最终版 v2.2，好像在此版本之后，作者没了更新。

无惧上传类使用示例：

上传文件的表单要加入enctype="multipart/form-data"属性，即

<form name="form1" method="post" action="" enctype="multipart/form-data">

<input type="text" value="1" name="name">

<input type=file name="img">

<input type=submit name="submit" value="提交">

</form>

在执行上传的ASP页

'包含类文件

<!-- #include file="upfile_class.asp" -->

dim upfile

dim SaveFilename

'建立上传对象

set upfile=new upfile_class

'取得上传数据,限制最大上传10M 计算方法为 10240000/1000000=10.24M

upfile.GetData (10240000)

'判决是否出错

if upfile.isErr then

select case upfile.err

case 1

Response.Write "你没有上传数据呀???是不是搞错了??"

case 2

Response.Write "你上传的文件超出我们的限制,最大10M"

end select

else

'执行保存文件代码

upfile.SaveToFile "img","c:\"&upfile.file("img").filename

'执行自动保存文件代码，SaveFilename为保存的文件名

SaveFilename=upfile.AutoSave("img","c:\")

'销毁对像

set upfile=nothing

end if