📄 upsave.asp
字号:
<!--#include file="../include/buyok_shop_30_conn.asp"-->
<html>
<head>
<title>文件上传</title>
<meta name="Description" Content="">
<link rel="stylesheet" href="manage.css" type="text/css">
</head>
<body>
<%
fuptype=session("fuptype") '上传类型,adv表示广告图片,pic表示产品图片
fupname=session("fupname") '传递文件名
frmname=session("frmname") '传递表单名
if fuptype="" or fupname="" or frmname="" then
response.write "<script language='javascript'>"
response.write "alert('出现错误，请重新上传！');"
response.write "location.href='javascript:history.go(-1)';"
response.write "</script>"
response.end
end if
%>
<!--#include FILE="upload_5xsoft.inc"-->
<%
set upload=new upload_5xsoft
set file=upload.file("file1")
if file.fileSize>0 then
filename=fupname+"." '根据上一页传递过来的fupname决定主文件名
filenameend=file.filename
filenameend=split(filenameend,".") '确定扩展名
n=UBound(filenameend)
filename=filename&filenameend(n)
if fuptype<>"db" then
if file.fileSize>100000 then
response.write "<script language='javascript'>"
response.write "alert('您上传的文件太大，上传不成功，单个文件最大不能超过100K！');"
response.write "location.href='javascript:history.go(-1)';"
response.write "</script>"
response.end
end if
end if
if LCase(filenameend(n))<>"gif" and LCase(filenameend(n))<>"jpg" and LCase(filenameend(n))<>"swf" and LCase(filenameend(n))<>"htm" and LCase(filenameend(n))<>"mdb" then
response.write "<script language='javascript'>"
response.write "alert('不允许上传您选择的文件格式，请检查后重新上传！');"
response.write "location.href='javascript:history.go(-1)';"
response.write "</script>"
response.end
end if
if fuptype="adv" then
savepath="../images/adv/"&filename '广告图片
elseif fuptype="pic" then
savepath="../pic/digi/"&filename
elseif fuptype="link" then
savepath="../images/links/"&filename
elseif fuptype="db" then
savepath="./"&filename
end if
file.saveAs Server.mappath(savepath)
response.write "文件上传成功!上传文件的物理路径为："
response.write "<font color=red>"&Server.mappath(savepath)&"</font><br><br>"
response.write "<a href='"&savepath&"' target='_blank'>点击预览上传的文件</a>"
response.write "<br><br><INPUT onclick='javascript:window.close();' type=submit value='上传完成'>"
%>
<script language=JavaScript>
function inserttext(){
<%
'根据fuptype的类型判断回传value值到什么表单，adv表示广告，PIC表示产品，links表示友情链接图片
if fuptype="adv" then
response.write "self.opener.adv."&frmname&".value ='images/adv/"&filename&"';"
elseif fuptype="pic" then
response.write "self.opener.prodtable."&frmname&".value ='pic/digi/"&filename&"';"
elseif fuptype="link" then
response.write "self.opener.prodtable."&frmname&".value ='images/links/"&filename&"';"
end if
%>
}
inserttext();
</script>
<%
else response.write "<script language='javascript'>"
response.write "alert('文件内容不能为空，单击“确定”返回上一页！');"
response.write "location.href='javascript:history.go(-1)';"
response.write "</script>"
response.end
end if
set upload=nothing
session("fuptype")=""
session("fupname")=""
session("frmname")=""
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -