一聚教程网:一个值得你收藏的教程网站

最新下载

热门教程

模拟qq的复制聊天记录到发消息框

时间:2022-07-02 23:46:59 编辑:袖梨 来源:一聚教程网

接上-----“模拟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
     %>