upload.asp

完整功能: 1.自由限制上传文件类型 2.自由设置上传大小限制(单文件大小和总上传大小可自由修改限制) 3.支持两种文件名方式保存---原文件名保存和新文件名(根据时间随机生成)保存 4.提供

<!--#include file="../upload_class.asp"-->
<%
 on error resume next
 Dim Upload : set Upload=new AnUpLoad				 			'创建类实例
 Upload.GetData()												'获取并保存数据,必须调用本方法
 filename=Upload.save("file1").AsThis(server.mappath("."),0)	'调用简易保存方法1,保存上传文件到本页面所在文件夹
 'filename=Upload.saveAs("file1",server.mappath("."),0)			'调用简易保存方法2,保存上传文件到本页面所在文件夹;和上面的方法功能完全一样
 response.write filename										'输出文件名,由上面的函数返回
 set Upload=nothing												'销毁类实例
 if err then response.write err.description
%>