📄 upload1.asp
字号:
<%
OPTION EXPLICIT
Server.ScriptTimeOut=5000
%>
<!--#include FILE="UpLoadClass.asp"-->
<%
dim request2
'建立上传对象
set request2=New UpLoadClass
'以默认设置打开上传对象
'建议直接修改类的63,64,65,66行为自己需要的默认设置
'类的初始默认值分别为
'p_MaxSize = 1536000 单文件最大1500K
'p_FileType = "bmp/png/psd/jpg/gif" 允许上传jpg/gif格式文件
'p_SavePath = "photo/" 在当前目录保存文件,这里是相对路径,如:“UpLoadFile/”
'p_AutoSave = 0 自动生成无重复文件名保存目标文件
'这样每次就不要设置同样的参数了
request2.open()
%>
<html>
<head>
<title>上传成功</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="basic.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#F5F5F5" topmargin="15">
<table width="420" border="0" align="center" cellpadding="5" cellspacing="0" bgcolor="#FFFFFF" style="border:1px solid #999999">
<tr bgcolor="#F5F5F5">
<td><blockquote>
<%
response.Write("<p align='center'>上传成功!你的照片地址为:</p>")
'显示目标文件路径与名称
response.Write("<p align='center'><font color='#EC5106'>"&request2.SavePath&request2.Form("strPhoto")&"</font>")
response.Write("<p align='center'>请将上面的图片地址复制到“相片地址”栏内!<br>")
response.write "<p align='center'>[<a href=""javascript:window.close();"">关闭</a>]"
%>
</blockquote></td>
</tr>
</table>
</body>
</html>
<%
'释放上传对象
set request2=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -