wmcms_rollup.asp

完美政府版,正版网站解决方案

<div style="overflow:hidden;height:18px;line-height:18px">
     <div id="marqueebox">
           <div align="left">

<%
set rs9=server.CreateObject("ADODB.RecordSet") 
rs9.Source="select top 10 * from "& db_News_Table &" where checkked=1 order by newsid desc"
rs9.Open rs9.Source,conn,1,1
do while not rs9.EOF
title=trim(rs9("title"))
newsurl="Article.asp?NewsID=" & rs9("NewsID")
newswwwurl=rs9("titleface")
%>

<%

			datetime="<font class=middle>"& Month(rs9("UpdateTime"))  &"/"& Day(rs9("UpdateTime")) &"</font>"


%>
&nbsp;<a class=middle target="_blank" href="<%if rs9("titleface")="无" then %><%=newsurl%><% else %> <%=newswwwurl%><%end if%>" title="<%=htmlencode4(title)%>">
<font color=<%=rs9("titlecolor")%>><%=CutStr(htmlencode4(rs9("title")),30)%></font>&nbsp;&nbsp;<%=datetime%><BR>




<%rs9.movenext
loop
rs9.close
set rs9=nothing%>
             </div>
     </div>
</div>
<script>
function startmarquee(lh,speed,delay) {
var p=false;
var t;
var o=document.getElementById("marqueebox");
o.innerHTML+=o.innerHTML;
o.style.marginTop=0;
o.onmouseover=function(){p=true;}
o.onmouseout=function(){p=false;}
function start(){
t=setInterval(scrolling,speed);
if(!p) o.style.marginTop=parseInt(o.style.marginTop)-1+"px";
}
function scrolling(){
if(parseInt(o.style.marginTop)%lh!=0){
o.style.marginTop=parseInt(o.style.marginTop)-1+"px";
if(Math.abs(parseInt(o.style.marginTop))>=o.scrollHeight/2) o.style.marginTop=0;
}else{
clearInterval(t);
setTimeout(start,delay);
}
}
setTimeout(start,delay);
}
startmarquee(18,20,3000);
</script>

<%
rs9.close
set rs9=nothing
%>