📄 reupfile.asp
字号:
<script language="javascript">
var fname='';
function findname(vl)
{var no0=vl.lastIndexOf("\\");
var no1=vl.lastIndexOf(".");
var no2=vl.indexOf(":");
if (no0==-1 || no1==-1 || no2!=1 || no0>no1) return ;
var fname=vl.substr(no0+1);
return fname;
}
</script>
<%
if session("username")="" then
response.redirect "index.asp"
end if
filepath=request("fp")
zyyear=request("zyyear")
zymon=request("zymon")
filename=request("fn")
%>
<html>
<head>
<title>上传文件修改程序</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../images/style.css">
</head>
<body bgcolor="#FFFFFF">
<br><br>
<table width="400" border="0" align="center" cellpadding="3">
<tr align="center" valign="middle">
<td align="left"><center><b><font color=red style="font-size:14px">重新上传已存在的文件数据</font></b></center>
<form method="post" action="resave.asp" name="reg" enctype="multipart/form-data">
<font style="font-size:14px;color:blue">文件名:<u><%=filename%></u><input type="hidden" name="filename" value="<%=filename%>">,所属年月:<u><%=zyyear%>年<%=zymon%>月</u></font><br><br>
本地文件名:
<input type="file" name="sf_file" size="32" onpropertychange="fname.value=findname(this.value)">
<input type=hidden name="zyyear" value="<%=zyyear%>">
<input type=hidden name="zymon" value="<%=zymon%>">
<input type=hidden name="filepath" value="<%=filepath%>">
<br>
<input class=button9 type="submit" name="Submit" value="开始上传">
<input class=button9 type="reset" name="reset" value="重新选择">
<br></center>
</form>
</td>
</tr>
</table>
<script language=vbscript>
function reg_Onsubmit()
if document.reg.sf_file.value="" then
msgbox "必须选择需要上传的文件!"
reg_onsubmit=false
exit function
else
zyyear=document.reg.zyyear.value
zymon=document.reg.zymon.value
filename=document.reg.filename.value
filepath=document.reg.filepath.value
document.reg.action="resave.asp?filepath="&filepath&"&filename="&filename&"&zyyear="&zyyear&"&zymon="&zymon
end if
end function
</script>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -