📄 index.asp
字号:
<!--#include file="inc/HZC.asp"-->
<title>:::: <%=webname%> ::: <%=weburl%></title>
<script language="javascript">
<!-- hide
function killerrors() {
return true;
}
window.onerror = killerrors;
// -->
</script>
<script language=VBScript>
Dim Bar, Line, SP
Bar = 0
Line = "||"
SP = 100
Function Window_onLoad()
Bar = 95
SP = 10
End Function
Function Count()
If Bar < 100 Then
Bar = Bar + 1
Window.Status = "已成功下载" & Bar & "%" & " " & String(Bar, Line)
setTimeout "Count()", SP
Else
Window.Status = "<%=weblogo%>"
Document.Body.Style.Display = ""
End If
End Function
Call Count()
</script>
<%if webon="on" then%>
<%if player="on" then%>
<%if playerup="up" then%>
<frameset rows="38,*" frameborder="NO" border="0" framespacing="0">
<frame src="music/exobud.htm" name="topFrame" frameborder="no" scrolling="NO" noresize marginwidth="0" marginheight="10" bordercolor="#FFFFFF" >
<frame src="hzc.asp" name="mainFrame">
</frameset>
<%end if%>
<%if playerup="down" then%>
<frameset rows="*,38" frameborder="NO" border="0" framespacing="0">
<frame src="hzc.asp" name="mainFrame">
<frame src="music/exobud.htm" name="topFrame" frameborder="no" scrolling="NO" noresize marginwidth="0" marginheight="10" bordercolor="#FFFFFF" >
</frameset>
<%end if%>
<%end if%>
<%if player="off" then%>
<!--#include file="hzc.asp"-->
<%end if%>
<%end if%>
<%if webon="off" then%>
<body link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF" bgcolor="#000000">
<br>
<p align="center"><font color="#FFFFFF"><b><%=webtitle%></b></font></p>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -