📄 pmmessages.asp
字号:
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Refresh" content="5">
<link href="styles.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="5" topmargin="0">
<!--#include file="config.asp" -->
<%
if session.contents("Loggedon") = "Yes" then
varStartID = request("txtStartID")
varUserID = session.contents("UserID")
varUser2ID = request("sltUser2ID")
call openDB
varSQL = "Select * from PM LEFT OUTER JOIN USERS ON PM.UserID = USERS.UserID AND PM.User2ID = USERS.UserID WHERE (PM.UserID = " & varUserID & " OR PM.UserID = " & varUser2ID & ") AND (PM.User2ID = " & varUserID & " OR PM.User2ID = " & varUser2ID & ") AND PMID >= " & varStartID & " ORDER BY PMID Desc"
'打开数据库
rs.Open varSQL, conn, 0, 1
rs.movefirst
i=0
do
i=i+1
'获取聊天信息
varMessage = rs("Message")
response.write varMessage & "<br>"
rs.Movenext
loop until i=6 OR rs.EOF
else
response.write "你必须登录才能查看！"
end if
%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -