logo.asp

十分好的音乐网站源码 十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/system.css" rel="stylesheet" type="text/css">
<div id=demo style=overflow:hidden;height:245;width:150;color:#ffffff>
<div id=demo1>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td align="center">


<%
dim sb,ns
sb="select * from link "
set ns=DB.execute(sb)
if ns.eof and ns.bof then
response.write "<p class=index-zhi>最近没有链接!</p>"
else	
do while not ns.eof 
%>
      <a href=<%=ns("siteurl")%> target="_blank"> 
      <img height="30" width="88" src=<%=ns("logourl")%>></a> 
      <br>
<br>
<%
 ns.movenext					 
 loop					 
	end if
  %>					
						  
 </td>					 
 </tr>					 
  </table>                   
      </div>
<div id=demo2></div>
</div>
<script>
var speed=30
demo2.innerHTML=demo1.innerHTML
function Marquee(){
if(demo2.offsetTop-demo.scrollTop<=0)
demo.scrollTop-=demo1.offsetHeight
else{
demo.scrollTop++
}
}
var MyMar=setInterval(Marquee,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
</script>