要排版,方便大家帮你看清楚你的代码
                    <div       id="marquees">   
                            <ul>   
                                    <%   
set       rs=server.CreateObject("adodb.recordset")   
rs.open"select       *       from       messenger       where       Audit=1       and       tj=true       order       by       px,       id       desc",conn,1,1   
if       rs.eof       then   
response.Write("No       date!")   
else   
do       while       not       rs.eof   
%>   
                                    <li>   <img       src="/img/dian.gif"       />   <a       href="/company/date.asp?id=   <%=rs("id")%>   "       target="_blank">   <%=rs("companyname")%>   </a>   </a>   </li>   
                                    <%   
rs.movenext   
loop   
end       if   
rs.close   
set       rs=nothing   
%>   
                                    <!--   </marquee>   -->   
                            </ul>   
                    </div>   
                    <!--       以下是javascript代码       -->   
<script       language="javascript">   
marqueesHeight=268;       //内容区高度   
stopscroll=false;       //这个变量控制是否停止滚动   
with(marquees){   
noWrap=true;       //这句表内容区不自动换行   
style.width=0;       //于是我们可以将它的宽度设为0,因为它会被撑大   
style.height=marqueesHeight;   
style.overflowY="hidden";       //滚动条不可见   
onmouseover=new       Function("stopscroll=true");       //鼠标经过,停止滚动   
onmouseout=new       Function("stopscroll=false");       //鼠标离开,开始滚动   
}   
//这时候,内容区的高度是无法读取了。下面输出一个不可见的层"templayer",稍后将内容复制到里面:   
document.write('   <div       id="templayer"       style="position:absolute;z-   index:1;visibility:hidden">   </div>   ');   
function       init(){       //初始化滚动内容   
//多次复制原内容到"templayer",直到"templayer"的高度大于内容区高度:   
while(templayer.offsetHeight   <marqueesHeight){   
templayer.innerHTML+=marquees.innerHTML;   
}       //把"templayer"的内容的“两倍”复制回原内容区:   
marquees.innerHTML=templayer.innerHTML+templayer.innerHTML;   
//设置连续超时,调用"scrollUp()"函数驱动滚动条:   
setInterval("scrollUp()",20);   
}   
document.body.onload=init;   
preTop=0;       //这个变量用于判断滚动条是否已经到了尽头   
function       scrollUp(){       //滚动条的驱动函数   
if(stopscroll==true)       return;       //如果变量"stopscroll"为真,则停止滚动       
preTop=marquees.scrollTop;       //记录滚动前的滚动条位置   
marquees.scrollTop+=1;       //滚动条向下移动一个像素   
//如果滚动条不动了,则向上滚动到和当前画面一样的位置   
//当然不仅如此,同样还要向下滚动一个像素(+1):   
if(preTop==marquees.scrollTop){   
marquees.scrollTop=templayer.offsetHeight-marqueesHeight+1;   
}   
}   
</script>   
            </ul>   
</div>   
            <div       id="marqueed">   
                            <ul>   
                    <%   
        set       rs=server.CreateObject("ADODB.RecordSet")   
        sql="select       top       10       *       from       news       where       news_lb='行业资讯'       order       by       news_time       DESC       ,       id       desc"   
        rs.Open       sql,conn,1,3   
        if       rs.eof       and       rs.bof       then   
        response.Write("   <li>   暂时没有数据!   </li>   ")   
        else   
        dim       d   
        d=0   
        do       while       not       rs.eof       and       d   <=9   
        d=d+1   
%>   
                    <li>   <img       src="../img/dian.gif"       />   <a       href="/news/date.asp?lb=   <%=server.urlencode(rs   ("news_lb"))%>   &amp;i=   <%=rs("id")%>   "       target="_blank"       title="   <%=rs("news_title")%>   ">   <%=rs   ("news_title")%>   </a>   </li>   
                    <%   
        rs.movenext   
        loop   
        end       if   
        rs.close   
        set       rs=nothing   
%>   
                            </ul>   
                    </div>   
                    <!--       以下是javascript代码       -->       
<script       language="javascript">   
marqueedHeight=125;       //内容区高度   
stopscrol=false;       //这个变量控制是否停止滚动   
with(marqueed){   
noWra=true;       //这句表内容区不自动换行   
style.width=0;       //于是我们可以将它的宽度设为0,因为它会被撑大   
style.height=marqueedHeight;   
style.overflowY="hidden";       //滚动条不可见   
mouseover=new       Function("stopscrol=true");       //鼠标经过,停止滚动   
mouseout=new       Function("stopscrol=false");       //鼠标离开,开始滚动   
}   
//这时候,内容区的高度是无法读取了。下面输出一个不可见的层"templayer",稍后将内容复制到里面:   
document.write('   <div       id="templay"       style="position:absolute;z-index:1;visibility:hidden">   </div>   ');   
function       inite(){       //初始化滚动内容   
//多次复制原内容到"templayer",直到"templayer"的高度大于内容区高度:   
while(templay.offsetHeight   <marqueedHeight){   
templay.innerHTML+=marqueed.innerHTML;   
}       //把"templayer"的内容的“两倍”复制回原内容区:   
marqueed.innerHTML=templay.innerHTML+templay.innerHTML;   
//设置连续超时,调用"scrollUp()"函数驱动滚动条:   
setInterval("scroller()",20);   
}   
document.body.onload=inite;   
pTop=0;       //这个变量用于判断滚动条是否已经到了尽头   
function       scroller(){       //滚动条的驱动函数   
if(stopscrol==true)       return;       //如果变量"stopscroll"为真,则停止滚动       
pTop=marqueed.scrollTop;       //记录滚动前的滚动条位置   
marqueed.scrollTop+=1;       //滚动条向下移动一个像素   
//如果滚动条不动了,则向上滚动到和当前画面一样的位置   
//当然不仅如此,同样还要向下滚动一个像素(+1):   
if(pTop==marqueed.scrollTop){   
marqueed.scrollTop=templay.offsetHeight-marqueedHeight+1;   
}   
}   
</script>   
                            </ul>   
                    </div>