sys.asp

来自「国内第一数字点卡销售程序。功能强大。 完整无错!数据文件经MD5加密!经严格测」· ASP 代码 · 共 196 行

ASP
196
字号
<head>
<link rel="stylesheet" type="text/css" href="css.css">
<!--#include file="conn.asp"-->
<%
if session("admin_rank")<>1 then
response.write("<script>alert('您无权查看本页,SORRY!');window.location=('login.asp')</script>")
response.end
end if
%>
<%
function htmlencode(str)
htmlencode=replace(replace(replace(str,chr(13),"<br>"),"'","''"),chr(32),"&nbsp;")
end function
%>
<%
function modifycode(str)
modifycode=replace(replace(replace(str,"<br>",chr(13)),"'","''"),"&nbsp;",chr(32))
end function
%>
<%set rs=server.createobject("adodb.recordset")%>
</head>
<%
if request("action")="sys" then
sql="select * from sys"
rs.open sql,conn,3,3
rs("sys_name")=trim(request("sys_name"))
rs("sys_adds")=trim(request("sys_adds"))
rs("sys_mail")=trim(request("sys_mail"))
rs("sys_tel")=trim(request("sys_tel"))
rs("sys_qq")=trim(request("sys_qq"))
rs("sys_linkman")=trim(request("sys_linkman"))
rs("sys_count")=trim(request("sys_count"))
rs("sys_zip")=trim(request("sys_zip"))
rs("sys_post")=htmlencode(request("sys_post"))
rs("sys_network")=trim(request("sys_network"))
rs("sys_bank")=htmlencode(request("sys_Bank"))
rs("sys_info")=htmlencode(request("sys_info"))
rs("sys_mailserver")=trim(request("sys_mailserver"))
rs("sys_mailuser")=trim(request("sys_mailuser"))
rs("sys_mailpass")=trim(request("sys_mailpass"))
rs("sys_mailtitle")=trim(request("sys_mailtitle"))
rs("sys_bgimg")=trim(request("sys_bgimg"))
rs("sys_vip")=trim(request("sys_vip"))
rs("sys_jxs")=trim(request("sys_jxs"))
rs.update
rs.close
response.write "<script language=javascript>alert('修改成功!');window.location=('sys.asp')</script>"
response.End
end if
%>
<body style="background-color: #F0FBF1">

<div align="center">
<table border="0" width="734" cellspacing="1">
  <tr><%sql="select top 1 * from sys"
          rs.open sql,conn,3,3%>
    <td width="100%"><font color="#FF6600">
      </font>
      <form method="POST" action="sys.asp?action=sys">
        <table border="1" width="664" cellspacing="0" cellpadding="0" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF" height="806">
          <tr>

            <td width="115" align="center" style="padding: 5px" height="35">网站名称</td>
            <td style="padding: 5px" height="35">
			<input type="text" name="sys_name" size="35" value="<%=rs("sys_name")%>" class=input></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="35">地&nbsp;&nbsp;&nbsp; 址</td>   
            <td style="padding: 5px" height="35">
			<input type="text" name="sys_adds" size="35" value="<%=rs("sys_adds")%>" class=input></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="35">电子邮箱</td>
            <td style="padding: 5px" height="35">
			<input type="text" name="sys_mail" size="35" value="<%=rs("sys_mail")%>" class=input></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="35">联系电话</td>
            <td style="padding: 5px" height="35">
			<input type="text" name="sys_tel" size="35" value="<%=rs("sys_tel")%>" class=input></td>
          </tr>
<tr>
            <td width="115" align="center" style="padding: 5px" height="36">联系&nbsp;    
			QQ </td>
            <td style="padding: 5px" height="36"><input type="text" name="sys_qq" size="35" value="<%=rs("sys_qq")%>" class=input>
               </td>
          </tr>
<tr>
            <td width="115" align="center" style="padding: 5px" height="36">传&nbsp;&nbsp;&nbsp; 真</td>   
            <td style="padding: 5px" height="36">
			<input type="text" name="sys_fax" size="35" value="<%=rs("sys_fax")%>" class=input>    
			有则填,无可不填</td>
          </tr>
<tr>
            <td width="115" align="center" style="padding: 5px" height="36">联系人</td>
            <td style="padding: 5px" height="36">
			<input type="text" name="sys_linkman" size="35" value="<%=rs("sys_linkman")%>" class=input></td>
          </tr>
<tr>
            <td width="115" align="center" style="padding: 5px" height="36">访问人数</td>
            <td style="padding: 5px" height="36">
			<input type="text" name="sys_count" size="35" value="<%=rs("sys_count")%>" class=input></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="36">邮政编码</td>
            <td style="padding: 5px" height="36">
			<input type="text" name="sys_zip" size="35" value="<%=rs("sys_zip")%>" class=input></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="36">商城名称</td>
            <td style="padding: 5px" height="36">
			<input type="text" name="sys_network" size="35" value="<%=rs("sys_network")%>" class=input></td>
          </tr>

          <tr>
            <td width="115" align="center" style="padding: 5px" height="118">送货方式<br>
            (支持html)</td>
            <td style="padding: 5px" height="118">
			<textarea rows="8" name="sys_post" cols="65" class=input><%=modifycode(rs("sys_post"))%></textarea></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="118">汇款帐号</td>
            <td style="padding: 5px" height="118">
			<textarea rows="8" name="sys_bank" cols="65" class=input><%=modifycode(rs("sys_bank"))%></textarea></td>
          </tr>
          <tr>
            <td width="115" align="center" style="padding: 5px" height="131">商城简介</td>
            <td style="padding: 5px" height="131">
			<textarea rows="9" name="sys_info" cols="65" class=input><%=modifycode(rs("sys_info"))%></textarea></td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="41">
			发送邮件服务器:</td>
            <td style="padding: 5px" height="41"><input type="text" name="sys_mailserver" size="35" value="<%=rs("sys_mailserver")%>" class=input> 
			如:smtp.u518.com 或mail.sunbtob.com</td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="37">
			发送邮件用户名:</td>
            <td style="padding: 5px" height="37"><input type="text" name="sys_mailuser" size="35" value="<%=rs("sys_mailuser")%>" class=input> 
			如:info@u518.com</td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="37">
			发送邮件密码:</td>
            <td style="padding: 5px" height="37"><input type="password" name="sys_mailpass" size="35" value="<%=rs("sys_mailpass")%>" class=input> 
			如:aaaaaaa</td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="38">邮件标题:</td>
            <td style="padding: 5px" height="38"><input type="text" name="sys_mailtitle" size="35" value="<%=rs("sys_mailtitle")%>" class=input> 
			如:您的卡号和密码</td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="38">
			升VIP会员金额:</td>
            <td style="padding: 5px" height="38">
			<input type="text" name="sys_vip" size="9" value="<%=rs("sys_vip")%>" class=input> 
			用户消费满这个数目后系统自动升级为VIP会员</td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="38">
			升经销商会员金额:</td>
            <td style="padding: 5px" height="38">
			<input type="text" name="sys_jxs" size="9" value="<%=rs("sys_jxs")%>" class=input>  
			用户消费满这个数目后系统自动升级为经销商会员</td>
          </tr>
          <tr>
            <td width="115" align="right" style="padding: 5px" height="38">
			网页背景颜色:</td>
            <td style="padding: 5px" height="38">
<input type="radio" value="images/bg1.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg1.gif" then%>checked<%end if%>><img src="../images/bg1.gif">&nbsp;&nbsp;  
<input type="radio" value="images/bg2.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg2.gif" then%>checked<%end if%>><img src="../images/bg2.gif">&nbsp;&nbsp; 
<input type="radio" value="images/bg3.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg3.gif" then%>checked<%end if%>><img src="../images/bg3.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg4.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg4.gif" then%>checked<%end if%>><img src="../images/bg4.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg5.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg5.gif" then%>checked<%end if%>><img src="../images/bg5.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg6.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg6.gif" then%>checked<%end if%>><img src="../images/bg6.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg7.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg7.gif" then%>checked<%end if%>><img src="../images/bg7.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg8.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg8.gif" then%>checked<%end if%>><img src="../images/bg8.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg9.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg9.gif" then%>checked<%end if%>><img src="../images/bg9.gif">&nbsp;&nbsp;
<input type="radio" value="images/bg10.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg10.gif" then%>checked<%end if%>><img src="../images/bg10.gif">&nbsp;<br>
<input type="radio" value="images/bg.gif" name="sys_bgimg" <%if rs("sys_bgimg")="images/bg.gif" then%>checked<%end if%>>左右边框&nbsp;
  </td> </tr>
        </table><%rs.close
        %>
        <p align="center"><input type="submit" value="提交修改" name="B1"></p>
      </form></td>
</tr>
</table>
</div>

<%
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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