ASP生成QQ在线(多个QQ用","隔开)

 <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="images/qq.css" type="text/css">
<style>
body  {font-family: "宋体";font-size:9pt;}
A.qqa:link {COLOR: red; text-decoration: none}
A.qqa:visited {COLOR: red; text-decoration: none}
A.qqa:active {COLOR: red; text-decoration: none}
A.qqa:hover {COLOR: blue; text-decoration: none}

A.qqb:link {COLOR: black; text-decoration: none}
A.qqb:visited {COLOR: black; text-decoration: none}
A.qqb:active {COLOR: black; text-decoration: none}
A.qqb:hover {COLOR: blue; text-decoration: none}
</style>
</head>

<%
    dim qq_rs
 set qq_rs=server.CreateObject("adodb.recordset")
 qq_rs.open "select qq from contact",conn,1,1,1
 dim qq
 qq=qq_rs("qq")
 qq_rs.close
 set qq_rs=nothing 
    QQ=split(qq,",") '(多个用","隔开)
 dim N
    for N=0 to UBound(QQ)
    MyQQ=MyQQ+QQ(N)+":"
    next
%>
<script>
    var online= new Array();
    if (!document.layers)
    document.write('<div id="divStayTopLeft" style="position:absolute">')
</script>
<layer id="divStayTopLeft">

<table border="0" width="110" cellspacing="0" cellpadding="0">
<tr><td width="110" height="73" background="images/kefu_up.gif" align=center><span class="qqb">漳州印刷网</span></td>
</tr>
<script src="http://webpresence.qq.com/getonline?Type=1&<%=Myqq%>"></script>
<% for N=0 to UBound(QQ) %>
<tr><td valign=middle  background=images/kefu_middle.gif>
<script>
    if (online[<%=N%>]==0)
    document.write("&nbsp;&nbsp;<img src=img/QQoffline.gif border=0 align=middle><a style='font-size:12px;' target=blank href='http://wpa.qq.com/msgrd?V=1&Uin=<%=QQ(n)%>&Site=在线咨询&Menu=no' title='客服不在请留言'>&nbsp;<%=QQ(n)%></a>");
    else
    document.write("&nbsp;&nbsp;<img src=img/QQonline.gif border=0 align=middle><a style='font-size:12px;' target=blank href='http://wpa.qq.com/msgrd?V=1&Uin=<%=QQ(n)%>&Site=在线咨询&Menu=no' title='业务在线即时交谈'>&nbsp;<%=QQ(n)%></a>");
</script>
</td></tr>
<% next %>
<tr>
  <td width="110" height="31" align=center background="images/kefu_down.gif" class="qqa">zzys.17477.com</td>
</tr>
</table>
</layer>
<script type="text/javascript">
var verticalpos="frombottom"
if (!document.layers)
document.write('</div>')
function JSFX_FloatTopDiv()
{
 var startX =3,
 startY = 300;
 var ns = (navigator.appName.indexOf("Netscape") != -1);
 var d = document;
 function ml(id)
 {
  var el=d.getElementById?d.getElementById(id):d.all?d.all[id]:d.layers[id];
  if(d.layers)el.style=el;
  el.sP=function(x,y){this.style.left=x;this.style.top=y;};
  el.x = startX;
  if (verticalpos=="fromtop")
  el.y = startY;
  else{
  el.y = ns ? pageYOffset + innerHeight : document.body.scrollTop + document.body.clientHeight;
  el.y -= startY;
  }
  return el;
 }
 window.stayTopLeft=function()
 {
  if (verticalpos=="fromtop"){
  var pY = ns ? pageYOffset : document.body.scrollTop;
  ftlObj.y += (pY + startY - ftlObj.y)/8;
  }
  else{
  var pY = ns ? pageYOffset + innerHeight : document.body.scrollTop + document.body.clientHeight;
  ftlObj.y += (pY - startY - ftlObj.y)/8;
  }
  ftlObj.sP(ftlObj.x, ftlObj.y);
  setTimeout("stayTopLeft()", 10);
 }
 ftlObj = ml("divStayTopLeft");
 stayTopLeft();
}
JSFX_FloatTopDiv();
</script>