類比qq的複製聊天記錄到發訊息框

接上-----“類比qq的訊息接收”
    qq 的訊息發送介面提供了聊天記錄，並且你可以通過滑鼠輕鬆地、重複地把聊天記錄複製到發訊息框裡，下面就是我提供的web頁裡實現的方法（註：此頁面的來源為天樂的picq，小白只是添加了一個函數和自己的asp代碼，實現了複製的功能！）
下面是顯示聊天記錄頁的主要代碼：
    
<table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF">        
     <%
     
     '取出聊天記錄
     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
     %>     
    <tr>        
    <!--
    這裡實現複製聊天記錄
    
    -->    
    <td width="100%"    class="menuitems"    onMouseover="highlightie5()"