⑴ ASP无组件上传代码,只求简单!
dim upload,file
set upload=new UpFile_Class ''建立上传对象
upload.GetDate (2048*1024) '取得上传数据,限大小2M
if upload.err > 0 then
select case upload.err
case 1
Response.Write "请先选择你要上传的文件 [ <a href=# onclick=history.go(-1)>重新上传</a> ]"
case 2
Response.Write "文件大小超过了限制 2048K [ <a href=# onclick=history.go(-1)>重新上传</a> ]"
end select
else
formPath="UploadFile/" '上传目录
for each formName in upload.file ''列出所有上传了的文件
set file=upload.file(formName) ''生成一个文件对象
fileExt=lcase(file.FileExt) '取文件后缀名
'付值变量
randomize
ranNum=int(90000*rnd)+10000 '生成随机数
F_Type=CheckFiletype(fileEXT)
file_name=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum
filename=file_name&"."&fileExt
rename=filename&"|"
filename=formPath&filename '以上根据时间及随机数
生成新的文件名
Filesize=file.FileSize '取文件大小
'记录文件
if Filesize>0 then '如果 FileSize > 0 说明有文件数据
file.SaveToFile Server.mappath(FileName) ''执行上传文件
end if
set file=nothing
next
end if
set upload=nothing
⑵ asp.net文件上传最大限制是多少
对于asp.net,默认只允许上传2M文件,在web.config增加如下配置,一般可以自定义最大文件大小.
<httpRuntime
executionTimeout="300"
maxRequestLength="40960"
useFullyQualifiedRedirectUrl="false"/>
其中maxRequestLength属性就是限制上传大小的,如设为"40960"即为40M