接上-----“模拟qq的消息接收”
qq 的消息发送界面提供了聊天记录,并且你可以通过鼠标轻松地、重复地把聊天记录复制到发消息框里,下面就是我提供的web页里实现的方法(注:此页面的来源为天乐的picq,小白只是添加了一个函数和自己的asp代码,实现了复制的功能!)
下面是显示聊天记录页的主要代码:
<%
'取出聊天记录
touser=trim(server.HTMLEncode (Request.QueryString ("touser")))
'和该好友的聊天记录
sql="select * from msg where (sender='"&session("icqusername")&"' and receiver='"&touser&"' ) or ( sender='"&touser&"' and receiver='"&session("icqusername")&"' ) order by msgdate desc"
on error resume next
rs.open sql,conn,1,3
if Err.number <> 0 then
response.write Err.description
'else
'response.write rs.recordcount
end if
do while not rs.eof
%>
|