admin_main.asp

站完全依据SEO技术建立

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%if session("admin")="" then
  		response.redirect "../index.asp"
end if%>
<!--#include file="Config.asp"-->
<%=citycss%>
<%
If Request.QueryString("Action") = "Save" Then
myConn.execute("update up_yp set OKAr='"&Request.Form("ftype")&"',OKsize="&Request.Form("fsize")&",OKsizepic="&Request.Form("fsizepic"))
Response.redirect"Admin_Main.asp"
end if
%>
<script src="Images/up.Js"></script>
<br>
<table width="97%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">
<form name="Edit" action="Admin_Main.asp?Action=Save" method="post">
<tr> 
   <td width="200" height="30"> <div align="right">允许上传的文件类型：</div></td>
   <td>　<input name="ftype" type="text" class="TextBoxT" value="<%=rs(0)%>" size="50"> 以,分隔后缀名,切记勿允许上传asp/exe文件</td>
</tr>
<tr> 
   <td height="30"><div align="right">允许上传的文件大小：</div></td>
   <td>　<input name="fsize" type="text" class="TextBoxT" value="<%=rs(1)%>" size="15"> Byte = <%=rs(1)/1024%> K</td>
</tr>
<tr> 
   <td height="30"><div align="right">产品图片允许上传的大小：</div></td>
   <td>　<input name="fsizepic" type="text" class="TextBoxT" value="<%=rs(2)%>" size="15"> Byte = <%=rs(2)/1024%> K</td>
</tr>
<tr> 
   <td height="30" align="center" colspan="2"><input type="submit" name="Submit" value="修 改"></td>
</tr>
</form>
</table>