⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 iitoura.htm

📁 js腳本程序 介绍了一些JS编辑的一些例子
💻 HTM
字号:
<!-- no prod -->
<!doctype html public "-//W3C//DTD HTML 3.2//EN">
<HTML><head><title>IIS 漫游幻灯片 1</title>

<META NAME="ROBOTS" CONTENT="NOINDEX">

<SCRIPT Language="VBScript"> <!--

'Declare the variable used to increment the x coordinate
Public XPos
'Initialize the variable
XPos = 20

Function LightMe()
'Puts a spotlight on the title
call document.all.title.filters(0).addPoint(20, 10, 100, 200, 225, 200, 100)
MoveLight
End Function

Function MoveLight()
'Moves the spotlight from left to right across the title area until it reaches the edge
'of the window and then stops
'This increments the x coordinate
XPos = XPos + 5
'If not at the right edge of the window then move the spotlight right
If XPos < 480 Then
call document.all.title.filters(0).movelight(0, xpos, 10, 100, 1)
myTimer = window.setTimeout("Movelight", 1)
'If at the right edge of the window call the first paragraph of text
Else
window.clearTimeout(myTimer)
call document.all.title.filters(0).clear
Text1Trans
End If
End Function

Sub Text1Trans()
'Makes the first paragraph of text visible
Text1.filters(0).Apply()
Text1.style.visibility="visible"
Text1.filters(0).Play()
myTimer = window.setTimeout("Text2Trans", 3000)
End Sub

Sub Text2Trans()
'Makes the second paragraph of text visible
Text2.filters(0).Apply()
Text2.style.visibility="visible"
Text2.filters(0).Play()
Link2Trans
End Sub

Sub Link2Trans()
'Makes the Next button visible
Link2.filters(0).apply()
Link2.style.visibility="visible"
Link2.filters(0).play()
End Sub

Sub Next_onclick()
'Makes the button appeared depressed and moves to next slide
document.all.ButtonNext.src = "right3down.gif"
location.href= "iitourb.htm"
End Sub
-->
</script>

<META HTTP-EQUIV="Content-Type" content="text/html; charset=gb2312">
<META NAME="MS.LOCALE" CONTENT="ZH-CN">
<style>
body,div,td{font:menu}
</style>
</head>

<BODY onload="LightMe" BGCOLOR="#800000" TEXT="#D4B878" >


<Div id="title" style="position:absolute; left:7; top:7; width:425; visibility:visible; filter:Light"><strong>欢迎使用 Internet 信息服务!</strong></Div>

<div id="Text1" style="position: absolute;left: 7; top: 45; width: 425; visibility: hidden; filter: revealTrans(Duration=2, Transition=19); height: 39"><strong><font color="#D4B878">Microsoft Internet 信息服务是一个桌面 Web 服务器,使用它,您可以从自己的计算机上发布个人主页,并把您计算机上的文档共享到整个网络。</font>
</strong></div>

<div id="Text2" style="position: absolute; left: 200; top: 175; width: 225; visibility: hidden; filter: revealTrans(Duration=3, Transition=12); height: 39"><strong><font color="#D4B878">在将站点上载到 Internet 提供商之前,也可以将 IIS 用作开发平台。</font></strong></div>

<div id="Link2" style="position:absolute; top:285; left:385; visibility:hidden; filter:revealTrans(Duration=3, Transition=12)" ><img id="ButtonNext" src="right1up.gif" border=0 onmouseover="ButtonNext.src = 'img.gif' " onmouseout="ButtonNext.src = 'right1up.gif' " onclick=next_onclick></div>

<div id="NextButton" style="display:none"><img src=right3down.gif></div>


</font>
<p> </p>
<p> </p>
<p align="right">南方:<a href="http://www.1121.net/hw/" target="_blank">http://52windows.126.com</a></p>
<p align="right">北方:<a href="http://page.zsnet.com/~dovestamp" target="_blank">http://51windows.126.com</a></p>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -