📄 system.asp

📁 功能的增加及完善 1.完善了上次不能读写房源编号的错误； 2.增加了不是会员不能查看房主的相系方法的功能； 3.增加了不是会员不能发布的功能； 4.完善了会员中心信息等功能； 5.新增了一个

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="pass.asp"-->
<%
sql="select * from counst"
set rs=conn.execute(sql)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><% =rs("W_name") %></title>
<link href="images/css.css" rel="stylesheet" type="text/css">
</head>

<body bgcolor="#BBDDFF">
<%
if request("gn")="W_xiug" then
W_name=request("W_name")
W_admin=request("W_admin")
W_url=request("W_url")
W_Copyright=request("W_Copyright")
W_banner=request("W_banner")
W_logo=request("W_logo")
W_bbs=request("W_bbs")
W_liuyan=request("W_liuyan")
W_bulletin=request("W_bulletin")

set rs2=server.CreateObject("adodb.recordset")
sql2="select * from counst"
rs2.open sql2,conn,1,3

rs2("W_name")=W_name
rs2("W_admin")=W_admin
rs2("W_url")=W_url
rs2("W_Copyright")=W_Copyright
rs2("W_banner")=W_banner
rs2("W_logo")=W_logo
rs2("W_bbs")=W_bbs
rs2("W_liuyan")=W_liuyan
rs2("W_bulletin")=W_bulletin
rs2.update

Response.Write"<script language=JavaScript>"
Response.Write"alert(""恭喜！修改成功"");"
Response.Write"window.history.go(-1);"
Response.Write"</script>"
else
response.Write""
end if
%>

<form name="form1" method="post" action="system.asp?gn=W_xiug">
  <table width="60%" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr> 
      <td><table width="100%" border="0" cellspacing="0" cellpadding="5">
          <tr> 
            <td width="23%"><div align="right">网站名称：</div></td>
            <td colspan="2"><input name="W_name" type="text" id="W_name" value="<% =rs("W_name") %>"></td>
          </tr>
          <tr> 
            <td><div align="right">管理员名称：</div></td>
            <td colspan="2"> <input name="W_admin" type="text" id="W_admin2" value="<% =rs("W_admin") %>"></td>
          </tr>
          <tr> 
            <td><div align="right">网站地址：</div></td>
            <td colspan="2"><input name="W_url" type="text" id="W_url2" value="<% =rs("W_url") %>" size="50"></td>
          </tr>
          <tr> 
            <td><div align="right">版权信息：</div></td>
            <td colspan="2"><input name="W_Copyright" type="text" id="W_Copyright" value="<% =rs("W_Copyright") %>" size="50"></td>
          </tr>
          <tr> 
            <td><div align="right">Banner地址：</div></td>
            <td colspan="2"><input name="W_banner" type="text" id="W_banner" value="<% =rs("W_banner") %>" size="50"></td>
          </tr>
          <tr> 
            <td><div align="right">Logo地址：</div></td>
            <td colspan="2"><input name="W_logo" type="text" id="W_logo" value="<% =rs("W_logo") %>" size="50"></td>
          </tr>
          <tr> 
            <td><div align="right">论坛地址：</div></td>
            <td colspan="2"><input name="W_bbs" type="text" id="W_bbs" value="<% =rs("W_bbs") %>" size="50"></td>
          </tr>
          <tr> 
            <td><div align="right">留言本地址：</div></td>
            <td colspan="2"><input name="W_liuyan" type="text" id="W_liuyan" value="<% =rs("W_liuyan") %>" size="50"></td>
          </tr>
          <tr> 
            <td><div align="right">公告修改：</div></td>
            <td colspan="2"><textarea name="W_bulletin" cols="50" rows="5" id="W_bulletin"><% =rs("W_bulletin") %></textarea></td>
          </tr>
          <tr> 
            <td><div align="right"></div></td>
            <td width="28%"><input type="submit" name="Submit" value="修改"></td>
            <td width="49%"><input type="reset" name="Submit2" value="重置"></td>
          </tr>
        </table></td>
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -