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

📄 look.asp

📁 梦想世界虚拟社区
💻 ASP
字号:
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../format.css" type="text/css">
<script language="JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
</head>

<body bgcolor="#FFFFFF" text="#000000">
<div id="Layer1" style="position:absolute; left:205px; top:45px; width:48px; height:16px; z-index:1; visibility: hidden"> 
  <script>
  var tc_user="cenozoic1";
  var tc_class="15";
  var tc_union="";
  var tc_type="1";
</script>
  <script src="http://stat.t2t2.com/stat.js"></script>
</div>
<table width="300" border="1" cellspacing="0" cellpadding="0" bordercolorlight="#FFFFFF" bordercolordark="#990000">
  <tr> 
    <td valign="top"> 
      <table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <%
Set Cnn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.recordset")
StrCnn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("..\base\dumm.mdb")
Cnn.Open StrCnn 
rs.maxrecords = 1
rs.open "select * from qq where 接收人 = '" & session ("name1") & "' and 查看 = 0 order by 时间 desc",cnn %>
          
          <td bgcolor="#00CCFF" align="center"><%=rs ("发送人") %>发送给你的消息 
            <%tt = rs ("id")
			
			 %>
          </td>
        </tr>
        <tr> 
          <td></td>
        </tr>
        <tr> 
          <td><%=session ("name1") %>:</td>
        </tr>
        <tr> 
          <td><%=rs("内容") %></td>
        </tr>
        <tr> 
          <td align="right"><%=rs("时间") %></td>
        </tr>
        <tr> 
          <td align="right"><%=rs("发送人") %>
            <% rs.close %>
          </td>
        </tr>
        <% rs.open "update qq set 查看 = 1 where id = " & tt & "",cnn %>
      </table>
    </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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