📄 adminmap.asp
字号:
<%
if session("admin")="" then
response.redirect "../manage/login.asp"
else
if session("flag")>0 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
end if
%>
<!--#include file=conn.asp -->
<html>
<head>
<title>文件上传系统设置</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
td { font-size: 9pt}
a { color: #000000; text-decoration: none}
a:hover { text-decoration: underline}
.tx { height: 16px; width: 30px; border-color: black black #000000; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 6px; border-left-width: 0px; font-size: 9pt; background-color: #eeeeee; color: #0000FF}
.bt { font-size: 9pt; height: 16px; width: 100px; cursor: hand; background: #eeeeee; border: 0px; clip: rect( ); text-decoration: underline}
.tx1 { height: 20px; width: 30px; font-size: 9pt; border: 1px solid; border-color: black black #000000; color: #0000FF}
-->
</style>
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="770" border="1" cellspacing="1" cellpadding="2" align="center" bordercolor="#000000">
<tr>
<td bgcolor="#CCCCCC" colspan="2"> </td>
</tr>
<tr>
<td valign="top" width="77%">
<%
dim leixin
dim mapsize
dim filepath
dim logopath
dim weburl
dim mapsql
dim rsmap
dim fileset
dim nameset
dim upset
dim pathset
set rsmap = Server.CreateObject("ADODB.Recordset")
if Request.form("mapupdate")<>"true" then
mapsql = "SELECT * FROM setmap"
rsmap.Open mapsql,conn
%>
<form name="form1" method="POST" action="adminmap.asp">
<br>
<table width="70%" border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#999999">
<tr>
<td width="31%">
<div align="right">文件类型：</div> </td>
<td width="69%">
<input type="text" name="leixin" size="30" value="<%=(rsmap("leixin"))%>"> </td>
</tr>
<tr>
<td width="31%">
<div align="right">上传限制：</div> </td>
<td width="69%">
<input type="text" name="size" size="30" value="<%=(rsmap("size"))%>"> </td>
</tr>
<tr>
<td width="31%">
<div align="right">文件存储路径：</div> </td>
<td width="69%">
<input type="text" name="filepath" size="30" value="<%=(rsmap("filepath"))%>"> </td>
</tr>
<tr>
<td width="31%">
<div align="right">系统LOGO路径：</div> </td>
<td width="69%">
<input type="text" name="logopath" size="50" value="<%=(rsmap("logopath"))%>"> </td>
</tr>
<tr>
<td width="31%">
<div align="right">上传系统路径：</div> </td>
<td width="69%">
<input type="text" name="weburl" size="50" value="<%=(rsmap("weburl"))%>">
上传文件夹的绝对路径。</td>
</tr>
<tr>
<td width="31%">
<div align="right">上传设置：</div> </td>
<td width="69%">
<select name="fileset" style="width:96px">
<option value="1" selected>开通上传</option>
<option value="0">禁止上传</option>
</select> </td>
</tr>
<tr>
<td width="31%">
<div align="right">上传名称设置：</div> </td>
<td width="69%">
<select name="nameset">
<option value="1">日期参数</option>
<option value="2" selected>原文件名</option>
<option value="3">日期+原名</option>
</select> </td>
</tr>
<tr>
<td width="31%">
<div align="right">同时上传文件数：</div> </td>
<td width="69%">
<input type="text" name="upset" size="10" value="<%=(rsmap("upset"))%>">
个文件</td>
</tr>
<tr>
<td width="31%">
<div align="right">上传路径设置：</div> </td>
<td width="69%">
<select name="pathset">
<option value="0" selected>系统默认路径</option>
<option value="1">文件分类路径</option>
</select> </td>
</tr>
<tr bgcolor="#eeeeee">
<td colspan="2">
<div align="center">
<input type="submit" name="Submit" value="* 修改设置 *" class="bt">
</div> </td>
</tr>
</table>
<div align="center"><br>
<input type="hidden" name="mapupdate" value="true">
<input type="hidden" name="mapsetid" value="<%= rsmap("setid") %>">
</div>
</form>
<% else
leixin=Request.form("leixin")
mapsize=Request.form("size")
filepath=Request.form("filepath")
logopath=Request.form("logopath")
weburl=Request.form("weburl")
fileset=Request.form("fileset")
nameset=Request.form("nameset")
upset=Request.form("upset")
pathset=Request.form("pathset")
mapsql="select * from setmap where setid="&request("mapsetid")
rsmap.open mapsql,conn,1,3
rsmap("leixin")=leixin
rsmap("size")=mapsize
rsmap("filepath")=filepath
rsmap("logopath")=logopath
rsmap("weburl")=weburl
rsmap("fileset")=fileset
rsmap("nameset")=nameset
rsmap("upset")=upset
rsmap("pathset")=pathset
rsmap.update
%>
<div align="center"><b><font color="#FF0000">图片上传设置已经完成，请继续别的操作！</font></b></div>
<% end if %> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td colspan="2"> </td>
</tr>
</table>
</body>
</html>
<%
rsmap.Close
set rsmap=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -