📄 default.asp
字号:
<%
option explicit
dim PageName
PageName="default"
%>
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<!--#include file="function.asp"-->
<!--#include file="top.asp"-->
<%
sql="select win_width,win_height from announce where popup=1 and ischecked=1"
rs.open sql,conn,1,1
if not rs.eof then
%>
<SCRIPT LANGUAGE="javascript">
<!--
window.open ('popup.asp','newwindow','height=<%=rs(0)%>,width=<%=rs(1)%>,top=0,left=0,toolbar=no,menubar=no,scrollbars=no,resizable=yes,location=no,status=no')
-->
</SCRIPT>
<%
end if
rs.close
%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" valign=middle>
<td align="center"><script src="ad.asp?add=%BA%E1%B7%F9"></script></td>
</table>
<!--主栏开始-->
<table width=<%=TableWidth%> border=0 cellspacing=0 cellpadding=0>
<tr>
<%=OutTable("left")%>
<td bgcolor="<%=LeftBgColor%>" width="160" align="center" valign="top">
<!--#include file="default_left.asp"-->
</td>
<%=InTable("left")%>
<td bgcolor="<%=CenterBgColor%>" align=center valign=top>
<!--大右开始-->
<%dim totalontop,classurl,msql,thissql,showontop
if FenTitle<3 then%>
<!--#include file="default_right1.asp"-->
<%else%>
<!--#include file="default_right2.asp"-->
<%end if%>
<!--大右结束-->
</td>
<%=OutTable("right")%>
</tr>
</table>
<%
if ShowNewImg=1 then%>
<table width=<%=TableWidth%> border=0 cellspacing=0 cellpadding=0 background="<%=HHB1_img%>" BGCOLOR=<%=Out2Color%>>
<TD BGCOLOR=<%=Out1Color%> WIDTH=1></TD>
<TD WIDTH=<%=TableWidth%> background="<%=HHB1_img%>" BGCOLOR=<%=Out2Color%>>
<td style="BORDER-BOTTOM: <%=out3color%> 1px double" height=15 align=right>
<TD BGCOLOR=<%=Out1Color%> WIDTH=1></TD>
</table>
<div id=demo style=overflow:hidden;height:122;width:"<%=TableWidth%>";>
<table border=0 cellspacing=0 cellpadding=0 >
<tr>
<td id=demo1 valign=top>
<script language=javascript src="showimg.asp"></script></td>
<td id=demo2 valign=top></td>
</tr></table>
</div>
<script>
var speed=15
demo2.innerHTML=demo1.innerHTML
function Marquee(){
if(demo2.offsetWidth-demo.scrollLeft<=0)
demo.scrollLeft-=demo1.offsetWidth
else{
demo.scrollLeft++
}
}
var MyMar=setInterval(Marquee,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
</script>
<%end if%>
</table>
<table width=<%=TableWidth%> border=0 cellspacing=0 cellpadding=0 background="<%=HHB3_img%>" BGCOLOR=<%=Out2Color%>>
<TD BGCOLOR=<%=Out1Color%> WIDTH=1></TD>
<TD WIDTH=<%=TableWidth%> background="<%=HHB3_img%>" BGCOLOR=<%=Out2Color%>>
<td style="BORDER-BOTTOM: <%=out3color%> 1px double" height=13 align=right>
<TD BGCOLOR=<%=Out1Color%> WIDTH=1></TD>
</table>
<!--主栏结束-->
<%if ShowFriendSite=1 then%><script language=javascript src="friendsite.asp"></script><%end if
set rs=nothing%>
<!--#include file="copyright.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -