admin_upload.asp

来自「本人仅业余学习一些基础的ASP知识以供系统设计之用,并非专业人员,相关服务器设置」· ASP 代码 · 共 145 行

ASP
145
字号
<!-- #include file="../conn.asp" -->
<!--#include file="../inc/config.asp"-->
<!-- #include file="session.asp" -->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="load.css" rel="stylesheet" type="text/css">
</head>

<body>

<%
Select Case request.querystring("info")
	Case "BookFace"
		Call BookFace()
	Case "Bookview"
		Call Bookview()
	Case "authorFace"
		Call authorFace()
	Case "articleFace"
		Call articleFace()
	Case "articleview"
		Call articleview()
	Case "gonggao"
		Call gonggao()
	Case "fujian"
		Call fujian()
end select 
Sub BookFace()
session("CnendWeb_filepath")=SiteSystemPath&"BookFace"
session("CnendWeb_info")="BookFace"%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<form name="formBookFace" method="post" action="admin_upfile.asp?info=BookFace" enctype="multipart/form-data">
		<tr>
			<td height="28" align="left" valign="middle">
			<input type="hidden" name="filepath" value="<%=SiteSystemPath%>BookFace">
			<input type="hidden" name="act" value="upload">
			<input type="hidden" name="info" value="BookFace">
			<input type="file" name="file1" size="40" class="form">
			<input type="submit" class="form" name="Submit" value="上 传">限制:<%=BookFaceMaxFileSize%>K
			</td>
		</tr>
	</form>
</table>
<%end sub

Sub Bookview()
session("CnendWeb_filepath")=SiteSystemPath&"Bookview"
session("CnendWeb_info")="Bookview"%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<form name="formBookview" method="post" action="admin_upfile.asp?info=Bookview" enctype="multipart/form-data">
		<tr>
			<td height="35" align="left" valign="middle">
			<input type="hidden" name="filepath" value="<%=SiteSystemPath%>Bookview">
			<input type="hidden" name="act" value="upload">
			<input type="hidden" name="info" value="Bookview">
			<input type="file" name="file1" size="50" class="form">
			<input type="submit" class="form" name="Submit" value="上 传"><br>
			类型:<%=AllowFileExtStr%>,限制:<%=BookviewMaxFileSize%>K </td>
		</tr>
	</form>
</table>
<%end sub

Sub authorFace()
session("CnendWeb_filepath")=SiteSystemPath&"authorFace"
session("CnendWeb_info")="authorFace"
%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<form name="formauthorFace" method="post" action="admin_upfile.asp?info=authorFace" enctype="multipart/form-data">
		<tr>
			<td height="28" align="left" valign="middle">
			<input type="hidden" name="filepath" value="<%=SiteSystemPath%>authorFace">
			<input type="hidden" name="act" value="upload">
			<input type="hidden" name="info" value="authorFace">
			<input type="file" name="file1" size="40" class="form">
			<input type="submit" class="form" name="Submit" value="上 传">限制:<%=authorFaceMaxFileSize%>K
			</td>
		</tr>
	</form>
</table>
<%end sub

Sub articleFace()
session("CnendWeb_filepath")=SiteSystemPath&"articleFace"
session("CnendWeb_info")="articleFace"
%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<form name="formarticleFace" method="post" action="admin_upfile.asp?info=articleFace" enctype="multipart/form-data">
		<tr>
			<td height="28" align="left" valign="middle">
			<input type="hidden" name="filepath" value="<%=SiteSystemPath%>articleFace">
			<input type="hidden" name="act" value="upload">
			<input type="hidden" name="info" value="articleFace">
			<input type="file" name="file1" size="40" class="form">
			<input type="submit" class="form" name="Submit" value="上 传">限制:<%=articleviewMaxFileSize%>K
			</td>
		</tr>
	</form>
</table>
<%end sub

Sub articleview()
session("CnendWeb_filepath")=SiteSystemPath&"articleview"
session("CnendWeb_info")="articleview"
%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<form name="formrticleview" method="post" action="admin_upfile.asp?info=articleview" enctype="multipart/form-data">
		<tr>
			<td height="35" align="left" valign="middle">
			<input type="hidden" name="filepath" value="<%=SiteSystemPath%>articleview">
			<input type="hidden" name="act" value="upload">
			<input type="hidden" name="info" value="articleview">
			<input type="file" name="file1" size="50" class="form">
			<input type="submit" class="form" name="Submit" value="上 传"><br>
			类型:<%=AllowFileExtStr%>,限制:<%=articleviewMaxFileSize%>K </td>
		</tr>
	</form>
</table>
<%end sub

Sub gonggao()
session("CnendWeb_filepath")=SiteSystemPath&"uploadfile"
session("CnendWeb_info")="gonggao"
%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<form name="formgonggao" method="post" action="admin_upfile.asp?info=gonggao" enctype="multipart/form-data">
		<tr>
			<td height="28" align="left" valign="middle">
			<input type="hidden" name="filepath" value="<%=SiteSystemPath%>uploadfile">
			<input type="hidden" name="act" value="upload">
			<input type="hidden" name="info" value="gonggao">
			<input type="file" name="file1" size="50" class="form">
			<input type="submit" class="form" name="Submit" value="上 传"><br>
			类型:<%=AllowFileExtStr%>,限制:<%=MaxFileSize%>K </td>
		</tr>
	</form>
</table>
<%end sub%>

</body>

</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?