upload.asp

来自「完整功能: 1.自由限制上传文件类型 2.自由设置上传大小限制(单文件大小和」· ASP 代码 · 共 12 行

<!--#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
%>