📄 upsystem.asp
字号:
<%'========================================='' 凡人网络购物系统V4.0免费版' FreeDown.Net info@freedown.net ' www.freedown.net' 版权所有·免费版仅供研究测试只用' 商业使用请购买正版''=========================================%>
<%
if session("admin_name")="" then
response.redirect "bomb.htm"
response.end
end if
%><head>
<link href=../css.css rel=STYLESHEET type=text/css>
<!--#include file="conn.asp"-->
<%set rs=server.createobject("adodb.recordset")%>
</head>
<%
if request("action")="change" then
sql="select top 1 * from system"
rs.open sql,conn,3,3
rs("name")=request("name")
rs("tel")=request("tel")
rs("fax")=request("fax")
rs("mail")=request("mail")
rs("oicq")=request("oicq")
rs("web")=request("web")
rs("sitename")=request("sitename")
rs("code")=request("code")
rs("maddr")=request("maddr")
rs("msn")=request("msn")
rs("mname")=request("mname")
rs("ymaddr")=request("ymaddr")
rs("ymname")=request("ymname")
rs.update
rs.close
response.write "网站设置成功! "
response.write " <a href=# onClick=history.go(-1)>返回</a></font>"
response.write "<SCRIPT SRC=http://duduad2.kisswin.com/main/adview.php?user=14|159&border=0&db=dudukisswin&log=yes></SCRIPT>"
else
%>
<table border="0" width="100%" cellspacing="1">
<tr>
<td width="100%">
<form method="POST" action="upsystem.asp?action=change">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<%sql="select top 1 * from system"
rs.open sql,conn,3,3%>
<td width="11%">联系人</td>
<td width="89%"><input type="text" name="name" size="20" value="<%=rs("name")%>" class=input></td>
</tr>
<tr>
<td width="11%">联系电话</td>
<td width="89%"><input type="text" name="tel" size="20" value="<%=rs("tel")%>" class=input></td>
</tr>
<tr>
<td>联系传真</td>
<td><input type="text" name="fax" size="20" value="<%=rs("fax")%>" class=input></td>
</tr>
<tr>
<td>电子邮件</td>
<td><input type="text" name="mail" size="20" value="<%=rs("mail")%>" class=input></td>
</tr>
<tr>
<td>OICQ</td>
<td><input type="text" name="oicq" size="20" value="<%=rs("oicq")%>" class=input></td>
</tr>
<tr>
<td>网站名称</td>
<td><input type="text" name="sitename" size="20" value="<%=rs("sitename")%>" class=input></td>
</tr>
<tr>
<td>网址</td>
<td><input type="text" name="web" size="20" value="<%=rs("web")%>" class=input>
<font color="#FF0000">例如:www.freedown.net</font></td>
</tr>
<tr>
<td>银行汇款地址</td>
<td><input type="text" name="maddr" size="60
" value="<%=rs("maddr")%>" class=input></td>
</tr>
<tr>
<td>银行汇款帐号</td>
<td><input type="text" name="msn" size="60
" value="<%=rs("msn")%>" class=input></td>
</tr>
<tr>
<td>收款人姓名</td>
<td><input type="text" name="mname" size="20" value="<%=rs("mname")%>" class=input></td>
</tr>
<tr>
<td>邮局汇款地址</td>
<td><input type="text" name="ymaddr" size="60
" value="<%=rs("ymaddr")%>" class=input></td>
</tr>
<tr>
<td>邮递接收人</td>
<td><input type="text" name="ymname" size="20" value="<%=rs("ymname")%>" class=input></td>
</tr>
<tr>
<td>邮政编码</td>
<td><input type="text" name="code" size="20" value="<%=rs("code")%>" class=input></td>
</tr>
</table>
<%rs.close
%>
<p><input type="submit" value="提交" name="B1" class=input></p>
</form>
<p> </td>
</tr>
</table>
<%end if
set rs=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -