原代码只显示一张图片.代码如下:
Sub Header()
Dim HeadStr
HeadStr=HeadStr&"<html><head>"&vbcrlf
HeadStr=HeadStr&"<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"">"&vbcrlf
HeadStr=HeadStr&"<title>"&Site_Title&"</title>"&vbcrlf
HeadStr=HeadStr&"<script language=""JavaScript"">"&vbcrlf
HeadStr=HeadStr&"function initEcAd() {"&vbcrlf
HeadStr=HeadStr&"document.all.AdLayer2.style.posTop = -200;"&vbcrlf
HeadStr=HeadStr&"document.all.AdLayer2.style.visibility = 'visible'"&vbcrlf
HeadStr=HeadStr&"MoveRightLayer('AdLayer2');}"&vbcrlf
HeadStr=HeadStr&"function MoveRightLayer(layerName) {"&vbcrlf
HeadStr=HeadStr&"var x = 20;"&vbcrlf
HeadStr=HeadStr&"var y = 230;"&vbcrlf
HeadStr=HeadStr&"var diff = (document.body.scrollTop + y - document.all.AdLayer2.style.posTop)*.40;"&vbcrlf
HeadStr=HeadStr&"var y = document.body.scrollTop + y - diff;"&vbcrlf
HeadStr=HeadStr&"eval(""document.all."" + layerName + "".style.posTop = y"");"&vbcrlf
HeadStr=HeadStr&"eval(""document.all."" + layerName + "".style.posRight = x"");"&vbcrlf
HeadStr=HeadStr&"setTimeout(""MoveRightLayer('AdLayer2');"", 20);"&vbcrlf
HeadStr=HeadStr&"}"&vbcrlf

HeadStr=HeadStr&"document.write(""<div id=AdLayer2 style='position: absolute;visibility:hidden;z-index:1'><a href=\""http://wpa.qq.com/msgrd?V=1&Uin=416833081&Site=桂林市临桂镇竹泉酒厂在线咨询&Menu=yes\"" target=\""blank\""><img src=\""images/zaixian.gif\"" border=\""0\""></a></div>"");"&vbcrlf
HeadStr=HeadStr&"initEcAd()"&vbcrlf
HeadStr=HeadStr&"</script> "&vbcrlf
HeadStr=HeadStr&"<link type=""text/css"" rel=""stylesheet"" href=""main.css"">"&vbcrlf
HeadStr=HeadStr&"</head>"&vbcrlf
Response.Write HeadStr
End Sub

解决方案 »

  1.   

    if session("customerid") = "" then
    headStr += "offline.jpg"
    else
    headStr += "online.jpg"
    end if
      

  2.   

    现在已经可以了,不过还是谢谢zbjg,并把写好的代码如下:
    index.asp加入代码:
    <script>
    var online= new Array();
    </script>
    <script src="http://webpresence.qq.com/getonline?Type=1&416833081"></script>
    <%Header()%>在写Header()的时候加上
             HeadStr=HeadStr&"if (online[0]==0)"&vbcrlf
    HeadStr=HeadStr&"document.write(""<div id=AdLayer2 style='position: absolute;visibility:hidden;z-index:1'><a href=\""http://wpa.qq.com/msgrd?V=1&Uin=416833081&Site=桂林市临桂镇竹泉酒厂在线咨询&Menu=yes\"" target=\""blank\""><img src=\""images/zaixian2.gif\"" border=\""0\""></a></div>"");"&vbcrlf
    HeadStr=HeadStr&"else"&vbcrlf
    HeadStr=HeadStr&"document.write(""<div id=AdLayer2 style='position: absolute;visibility:hidden;z-index:1'><a href=\""http://wpa.qq.com/msgrd?V=1&Uin=416833081&Site=桂林市临桂镇竹泉酒厂在线咨询&Menu=yes\"" target=\""blank\""><img src=\""images/zaixian.gif\"" border=\""0\""></a></div>"");"&vbcrlf