📄 pop.asp

📁 1 除掉了时间限制 2 除掉了人数限制改为 500人原为5人 3 发现一点小缺陷增加人员的时候没有判断登陆名是否重复！自己写吧~~~：） 4 又是一点缺陷

💻 ASP

字号:

<!--#include file="config.ini" -->
<!--#include file="commfunction.inc" -->
<%
dim rsn
dim connn
set connn=server.CreateObject("adodb.connection")
set rsn=server.CreateObject("adodb.recordset")
connn.Open connstring
rsn.Open "select * from messenger where id="&request("id"),connn,1,1
%>
<HTML><HEAD><TITLE><%=rsn("subject")%></TITLE>
<LINK href="global.css" rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=javascript>
function answer(){
	window.open("newmessage.asp?consignee="+form1.answervalue.value,"","resizable=yes, scrollbars=yes, left= 300, top=220, menubar=no, location=no, toolbar=no ,width=350, height=250");
	window.close();
}
</script>
<body bgcolor=ffffff topMargin=0 leftMargin=0 rightMargin=0 bottomMargin=0>
 <form name=form1  method="post"  id=form1>
<table width="100%" height="100%" border="0" cellpadding="10" cellspacing="1" bgcolor="#DECFAD">
<input type=hidden name=answervalue value="<%=rsn("sender")%>">
  <tr bgcolor="#EFEFEF"> 
    <td height=25 align=center valign="top"> 
      <div align="left"> 
        <font color="#0000FF" size="2"><%=rsn("subject")%></font>
          <br><br>
          &nbsp;&nbsp;&nbsp;&nbsp; <%=rsn("description")%>
          <br>
          <br>
          <br>
          <br><div style="cursor:hand"><a href="newmessage.asp?consignee=<%=rsn("sender")%>&str=<%=rsn("description")%>">回复</a>
		  &nbsp;&nbsp;&nbsp;&nbsp;<a onclick="window.close();">取消</a></div>
      </div></td>
  </tr>
</table>
</form>
</body>
<%
rsn.Close 
set rsn=nothing
connn.execute("delete from messenger where id="&request("id"))
connn.Close 
set connn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -