⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_statement.asp

📁 花钱买的毕业设计。企业网络管理系统
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../include/config.asp" -->
<!--#include file="../include/check_session.asp" -->
<html>
<head>
<title>会员章程</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style/style.css" rel="stylesheet" type="text/css">
</head>
<%
dim str
if Request.Form("Submit") <> "" then
	dim title,content
	title = trim(Request.Form("title"))
	content = trim(Request.Form("statement"))
	str = "update statement set title = '"& title &"', content = '"& content &"' where id = 1"
	Session("conn").Execute str,,adCmdText + adExecuteNoRecords
End If
str = "select * from statement where id = 1"
Session("rs").open str,Session("conn")
if not Session("rs").eof then
%>
<body>
<form action="admin_statement.asp" method="post"><table width="400" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="30"  align="center"> <input name="title" type="text" value="<%= Session("rs")("title") %>"></td>
  </tr>
  <tr> 
    <td  align="center"> <textarea name="statement" style="width:400" rows="10"><%= Session("rs")("content") %></textarea> 
    </td>
  </tr>
  <tr> 
    <td  align="center"> <input name="Submit" type="submit" id="Submit" onclick="javascript:window.navigate('register_member.asp')" value="修  改">
      &nbsp;&nbsp; 
      <input name="Reset" type="reset" class="button1" id="Reset" onclick="javascript:history.back()" value="重  置" align="center"> 
    </td>
  </tr>
  <tr> 
    <td  align="center">&nbsp;</td>
  </tr>
</table>
</form>
</body>
<%
End If
Session("rs").close
%>
</html>

⌨️ 快捷键说明

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