📄 showmess.asp

📁 不错的ASP整站源代码。在IIS环境下运行都没有问题

💻 ASP

字号:

<html>
<head>
<title>收到新消息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
td{font-size:9pt;}
A:link {COLOR: #000000; TEXT-DECORATION: none; font-size: 9pt}
A:active {COLOR: #000000; TEXT-DECORATION: none; font-size: 9pt}
A:visited {COLOR: #000000; TEXT-DECORATION: none; font-size: 9pt}
</style>
<script language=javascript>
<!--
function view(user,myself)
{url="remess.asp?user="+user;
 privatemsg = window.open(url,"AE","WIDTH=260,HEIGHT=120,left=100,top=250,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=yes,menu=no,min=no,max=no");
 }
-->
</script>
</head>
<body aLink="#FF0000" bgcolor=#FFFFFF topMargin="4" MARGINWIDTH="5" MARGINHEIGHT="4">
<%
'Response.Write request("message")&"whc"
temp=left(request("message"),len(request("message"))-2)
message1=split(temp,"||")
'session("message")=""%>

<%for i=0 to ubound(message1)
message=split(message1(i),"$$")%>

<TABLE border=0  cellPadding=3 cellSpacing=1 width=100% align=center bgcolor="#FFCCCC">
  <tr bgcolor="#ffeeee"> 
    <td align=center colspan="2" height="22">在线信息接收</td>
  </tr>
  <tr> 
    <td align=center bgcolor="#ffeeee"> 
      <% if message(0)="spc" then%>
      站长通知 
      <%else%>
      发送居民 
      <%end if%>
    </td>
    <td width=80% bgcolor="#fff7f7"><a href=javascript:view('<%=message(0)%>','<%=message(1)%>')><%=message(0)%></a></td>
  </tr>
  <tr> 
    <td align=center bgcolor="#ffeeee">短信内容</td>
    <td bgcolor="#fff7f7"><%=message(2)%></td>
  </tr>
  <%next%>
    
  <tr bgcolor="#FFFFFF"> 
    <td align=center colspan="2" height="25"> <a href="javascript:window.close()">[ 
      关闭窗口 ]</a>　　<a href=javascript:view('<%=message(0)%>','<%=message(1)%>')>[ 
      回复<%=message(0)%> ]</a> </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -