江西省国防科技工业学校9846班

网会阁

当前位置: 本站首页 > HTML网页特效

04背景向下移动

时间:2024-10-28 16:13来源:未知 作者:admin 点击:
html head title背景向下移动/title style type="text/css" !-- body { font-family: "宋体"; font-size: 9pt; margin-top: 0px; margin-left: 0px; margin-right: 0px} A { COLOR: black; FONT-SIZE: 9pt; FONT-WEIGHT: 400; TEXT-DECORATION: none

<html>


<head>


<title>背景向下移动</title>


<style type="text/css">


<!--


body {  font-family: "宋体"; font-size: 9pt; margin-top: 0px; margin-left: 0px; margin-right: 0px}


A { COLOR: black; FONT-SIZE: 9pt; FONT-WEIGHT: 400; TEXT-DECORATION: none }


A:hover { COLOR: red; FONT-SIZE: 9pt; FONT-WEIGHT: 400; TEXT-DECORATION: underline }


a:active     { font: 9pt "宋体"; cursor: hand; color: #FF0033 }




-->


</style>


<meta http-equiv="Content-Type" content="text/html; charset=gb2312">


</head>




<body background=back.jpg onLoad="ob(),setNum(),setInterval('timer()',100);setInterval('runClock()',100)">


<br>


<br>


<center><font color=red face="隶书" size=6>背景向下移动脚本</font></center>


<br>


<br><center>


<table border=5 bordercolor=blue borderlight=green>


<tr><td align=center><font size=5 color=red face="Arial, Helvetica, sans-serif"><strong>看到背景在动了吗?</strong></font></td></tr>


</table></center>


<br>


<br>


<center>


<textarea name=source rows=12 cols=55 class=yk9>


脚本说明:


第一步:把如下代码加入<body>区域中


<SCRIPT language=VBScript>


dim c,numgc


c=-100000


numgc=document.body.sourceIndex


sub SF


c=c+2


Document.all(numgc).style.BackgroundPosition="0 "&c


id=SetTimeOut("SF",64,"VBScript")


end sub


SF


</SCRIPT>






第二步:把<body>换为


<body background=back.jpg onLoad="ob(),setNum(),setInterval('timer()',100);setInterval('runClock()',100)">


</textarea>


<SCRIPT LANGUAGE="JavaScript">




<!-- hide




function goHist(a)




{




  history.go(a);




}




//-->




</script>




<FORM METHOD="post">


<INPUT TYPE="button" VALUE="返回" onClick="goHist(-1)" style="background-color: #8000FF; color: rgb(255,255,255)">


</form>


</center>


<br>


<br>


<SCRIPT language=VBScript>


dim c,numgc


c=-100000


numgc=document.body.sourceIndex


sub SF


c=c+2


Document.all(numgc).style.BackgroundPosition="0 "&c


id=SetTimeOut("SF",64,"VBScript")


end sub


SF


</SCRIPT>


</body>


</html>

(责任编辑:admin)
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
表情:
用户名: 验证码:点击我更换图片
本站页面浏览总量: