📄 upload.asp
字号:
<%
OPTION EXPLICIT
Server.ScriptTimeOut=100000
%>
<!--#include FILE="gwssc.asp"-->
<%
dim request2
'建立上传对象
set request2=New UpLoadClass
'上传总大小为1000M
request2.TotalSize= 1048576000
'单文件最大500M
request2.MaxSize = 524288000
'允许上传文件格式
request2.FileType = "rar/zip/doc/xls/ppt/jpg/gif/jpeg/txt/bmp/htm/html"
request2.open()
%>
<html>
<head>
</head>
<body background="../bg01.gif" topmargin="0" leftmargin="0">
<div align="left">
<table width="400" border="0" align="left" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td background="../bg01.gif"><blockquote>
风声无组件上传类 2.08 Beat 1<br>
文件已上传成功!请复制下面文件生成的地址：
<%
if request2.Error=4 then
response.Write("<p>总数据量超过限制，上传失败</p>")
response.write "<font size=2><br>[<a href=""javascript:history.back();"">返回</a>]"
end if
response.write "<input type=""text"" size=""55"" value="""&request2.SavePath&request2.Form("strFile1")&""">"
response.write "</font>"
%>
</blockquote></td>
</tr>
</table>
</div>
</body>
</html>
<%
set request2=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -