看到楼上这位朋友的回复,我感觉真的有点什么~~~~~~
我也不知道这么说好,反正做人这东西就你情我愿的,如果自己没兴趣去帮助别人的话就不要再去挖苦别人了~~~~
下面是我个人写的代码:请大家帮忙看一下(天底下没什么是难的,只有自己有内心去学)
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Content-Language" content="UTF-8" />
<meta name="author" content="荣软 rongsoft" />
<meta name="keywords" content="滚动数据库" />
<meta name="description" content="滚动数据库" />
<title>滚动数据库</title>
<style type="text/css">
<!--
.STYLE1 {
color: #000000;
font-weight: bold;
}
.STYLE2 {color: #FF0000}
-->
</style>
</head>
<%
dim conn
dim connstr
dim db
dim biaoti_title
dim wangzhi_wangzhi
db="rongsoft.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
%>
今日部分学员报名列表
<DIV id=icefable1 style="WIDTH: 190px">
<%
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from baoming order by shijian desc"
rs.open sql,conn,1,1
for i=1 to 5
If rs.eof or rs.bof Then
exit for
end if
%>
<br />
姓 名: <%=rs("xingming")%> <br />
性 别: <%=rs("xingbie")%> <br />
学 校: <%=rs("xuexiao")%> <br />
专 业: <%=rs("zhuanye")%><br />
时 间: <%=rs("shijian")%><br />
<%
rs.movenext
next
%>
</DIV>
<DIV id=icefable2 style="Z-INDEX: 1; VISIBILITY: hidden; POSITION: absolute"></DIV>
<SCRIPT>
marqueesHeight=110; //20 显示高度
stopscroll=false;
icefable1.scrollTop=0;
with(icefable1){ //对于图层1
style.width=0;
style.height=marqueesHeight;
style.overflowX="visible";
style.overflowY="hidden";
noWrap=true;
onmouseover=new Function("stopscroll=true"); //鼠标悬停时间
onmouseout=new Function("stopscroll=false");
}
preTop=0;
currentTop=0;
stoptime=0;
function init_srolltext(){
icefable2.innerHTML="";
icefable2.innerHTML+=icefable1.innerHTML;
icefable1.innerHTML=icefable2.innerHTML+icefable2.innerHTML;
setInterval("scrollUp()",10); //20 移动的速度
}
function scrollUp(){
if(stopscroll==true) return;
currentTop+=1;
if(currentTop==120) //一次滚动多少,整行上串为marqueesHeight+1
// if(currentTop==marqueesHeight+1)
{
stoptime+=1;
currentTop-=1;
if(stoptime==200) //停止的时间
{
currentTop=0;
stoptime=0;
}
}
else {
preTop=icefable1.scrollTop;
icefable1.scrollTop+=1;
if(preTop==icefable1.scrollTop){
icefable1.scrollTop=icefable2.offsetHeight-marqueesHeight;
icefable1.scrollTop+=1;
}
}
}
init_srolltext();
</SCRIPT>
图片附件: 游客没有浏览图片的权限,请
登录 或
注册
图片附件: 游客没有浏览图片的权限,请
登录 或
注册
由于超出了上传限制,所以~~~~~~~~~~~