📄 supload2.asp

📁 一个简单的小程序

💻 ASP

字号:

<!--#include FILE="upload_inc.asp"-->
<html>
<head>
</head>
<style>
body { font-size:9pt  }
</style>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">

<%
set upload=new upload_5xsoft
set file=upload.file("sf_upfile")
if file.fileSize<1 then
   response.write"<script language=javascript>alert('您没有选择压缩包');history.back()</script>"
   response.end 
end if
upfilename = split(file.FileName,".")
upfileext = upfilename(ubound(upfilename))
if upfileext<>"rar" and upfileext<>"doc" then
	response.write "错误:上传的文件格式不对! <a href='javascript:history.go(-1)'>退回上一步</a>"
	response.end
end if
ufp=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&"."&upfilename(ubound(upfilename))
file.saveas Server.mappath("../download/"&ufp)
%>
<script >
parent.myform.pic.value=''
parent.myform.pic.value+='download/<%=ufp%>'
location.replace('supload.asp')
</script>
<%
set file=nothing
set upload=nothing
'set my_conn = nothing
'set rs = nothing
%>
</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -