模拟qq的消息接收

    
接上：--->“模拟QQ的下拉列表选择图象（小白完善版）”
     我们知道，在使用qq时，当你的朋友给你发来消息时，他的头像会不停的闪动，直到你查看该条消息，他才安静下来。这次小白要做的就是模拟这个东东：
     1、来消息-->头像闪动
            首先我们取出用户列表---如果该用户没发新消息给你，则显示他注册时的头像，否则，显示的图片为我们特制的动画图片（也可以对他的图片进行js特效处理：过一定的时间显示，给人闪动的感觉），这里给出第一种方法的代码：
           <SCRIPT language=javascript>
var t
//在线会员
t=outlookbar.addtitle('我的好友')     
<%
dim x()
dim y()
dim news
dim thenews
dim i
dim j
news=false
i=0
set rs=server.CreateObject ("ADODB.RecordSet")
sqlstr="select * from msg where receiver='"&session("icqusername")&"' and state='new'"
rs.Open sqlstr,conn,3,3
if not rs.BOF then
do while not rs.EOF
    redim Preserve x(i)
    redim Preserve y(i)
    x(i)=rs("sender")
    y(i)=rs("msgid")
    rs.MoveNext
    i=i+1
loop
end if
rs.Close
%>
//取出你在线的好友名单
//session("icqusername")为你自己
<%
sqlstr="select * from userinfor where username <> '"&session("icqusername")&"'    and online=true    and ......."
'上面这条sql语句因你的程序而变
rs.open sqlstr,conn,1,1
do while not rs.eof
for j=0 to i-1
if rs("username")=x(j) then
    news=true
    thenews=y(j)

补充：asp教程,技巧与性能优化