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

📄 default.asp

📁 庐江二中
💻 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 + -