📄 upfile.asp
字号:
<!--upfile.asp-->
<%
sub show_files()
on Error Resume Next
'定义上传目录
const dirUpload = "upload"
set objUpload = server.CreateObject("aspSmartUpload.SmartUpload")
'限制最大上传字节数
objUpload.TotalMaxFileSize = 8388608
'限制文件上传类型为文本
objUpload.AllowedFilesList = "jpg"
'文件上传
objUpload.Upload
'保存文件在upload目录，同时取得上传的文件数
intNo = objUpload.save(dirUpload)
'如果Err值=0，则说明上传成功
if Err <> 0 then
response.write "上传文件错误： <font color=ff0000>"&Err.Description&"</font>"
else
response.write "上传文件成功！<p>"
response.write "文件名：<br>"
'遍历files集合，取出上传文件的属性
for each thefile in objUpload.files
'如果上传文件不为空
if thefile.fileName <> Empty then
'输出文件名（不含路径）
response.write thefile.fileName&" </b></font>("
'输出各个文件的字节数
response.write FormatNumber(thefile.size,0)&"bytes)<br>"
end if
Next
end if
end sub
%>
<body>
<% show_files %>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -