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

📄 incpage.asp

📁 安全性好,适用于制作论坛和进行资源下载的个人和大型网站使用!
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<%
sub bbs_top()
dim skin
if Request.Cookies("skins")<>"" and hx66skin=1 then
skin=Request.Cookies("skins")
elseif Request.Cookies("skins")="" or hx66skin=2 then
if isnull(bbs_skin) or bbs_skin="" then
skin=bbsskin
else
skin=bbs_skin
end if
else
skin=bbsskin
end if
%>
<!--
┌──────────HX66─┐
│ 花香盈路HX66.net版权所有 │
└───────────.net┘
-->
<html>
<head>
<title><%=bbsname%> - <%=start%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<META NAME="keywords" CONTENT="hx66,xc">
<META NAME="description" CONTENT="新闻,歌曲,影视,文章,下载,特效,图片,酷站,连接,统计,留言">
<META NAME="robots" CONTENT="all"><META name="AUTHOR" content="xc,xc@hx66.net">
<link href="../skin/<%=skin%>/css.css" rel="stylesheet" type="text/css">
<script language="javascript" src="inc/board.js"></script>
</head>
<body>
<table width="760"  border="0" cellspacing="0" cellpadding="0" align="center">
      <tr>
        <td height="1"><!--#include file="count.asp"--></td>
      </tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="table-hx66s">
  <tr>
    <td valign="top" background="../skin/<%=skin%>/banner.gif" height="140"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="300" height="108">
              <param name="movie" value="../img/top.swf">
              <param name="quality" value="high">
              <param name="wmode" value="transparent">
              <embed src="../img/top.swf" width="300" height="108" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"> 
              </embed> </object></td>
      </tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="table-hx66s" bgcolor=#FFFFFF>
  <tr>
    <td height="25"><table width="100%"  border="0" cellspacing="0" cellpadding="0"  class="table-top">
      <tr>
        <td width="75%" height="26">&nbsp;&nbsp;&nbsp;<font style="font-size:7px; color:ACACAC"><a href="../index.asp">网站首页</a> <script language=javascript>
	MNL();
	MN1(1);
	MN("../news.asp","新闻动态");
	MN("../art.asp","文章中心");
	MN2(1,"../art.asp","新闻文章")
	MNL();
	MN1(2);
	MN("../dj.asp","歌曲音乐");
	MN("../vid.asp","影视中心");
	MN2(2,"../dj.asp","影音娱乐")
	MNL();
	MN1(3);
	MN("../pic.asp","精美图片");
	MN("../down.asp","软件下载");
	MN("../web.asp","酷站推荐");
	MN("../js.asp","网页特效");
	MN2(3,"../down.asp","资源中心")
	MNL();
	MN1(4);
	MN("../book.asp","留言本站");
	MN("../link.asp","友情连接");
	MN2(4,"../book.asp","用户信息")
	MNL();
	MN1(5);
	MN("default.asp","程序讨论");
	MN("../../bbs/","花香论坛");
	MN2(5,"../../bbs/","综合导航")
	MNL();
	MN1(6);
	MN2(6,"../hxblog.asp","BLOG日志")
	MNL();
	MN1(7);
	var tu="../cookies.asp?menu=skins&no=";	MN(tu+"","默认设置");
	MN(tu+"0","蓝色理想");
	MN(tu+"1","黄色魅力");
	MN(tu+"2","墨蓝深远");
	MN(tu+"3","粉红诱惑");
	MN(tu+"4","灰色畅想");
	MN(tu+"5","花之仙子");
	MN(tu+"6","生命绿色");
	MN2(7,tu,"自选风格");
	</script></font></td>
        <td width="25%" align="right">今天是:<font color="red"><SCRIPT language=JavaScript src="inc/date.js" type=text/JavaScript></SCRIPT></font>&nbsp;</td>
       </tr>
    </table></td>
  </tr>
  <tr>
    <td height="15"></td>
  </tr>
</table>
<%
end sub
'------------------------------------------------------------------------------------------
sub bbs_top1()
%>
<table width="760"  border="0" cellspacing="0" cellpadding="0" class="table-hx66s" align="center" bgcolor=#FFFFFF>
<tr><td valign=middle nowrap>&nbsp;&nbsp;<img src="images/title.gif" border="0"> <%=bbs_dis%></td>
<td valign=middle nowrap align=right>
<select onchange="if(this.options[this.selectedIndex].value!=''){location=this.options[this.selectedIndex].value;}" class="input">
<option selected>跳转论坛至...</option>
<%
sql="select * from hx66_bbsid ORDER BY hx66_order ASC"
set rs1=conn.execute(sql)
do while not rs1.eof
response.write "<optgroup label='"&rs1("hx66_title")&"'>"
sql="select * from hx66_bbsinfo where hx66_bbsid="&rs1("id")&" ORDER BY hx66_order ASC"
set rs2=server.createobject("adodb.recordset")
rs2.open sql,conn,1,1
do while not rs2.eof
response.write "<option value="&bbs_url&".asp?bid="&rs2("id")&">├&nbsp;"&rs2("hx66_bbstitle")&"</a></option>"
rs2.movenext
loop
rs1.movenext
loop
rs2.close
set rs2=nothing
rs1.close
set rs1=nothing
%>
&nbsp;</td>
   </tr>
   <tr><td height="8"></td>
 </tr>
</table>
<table width="760"  border="0" cellspacing="0" cellpadding="0" class="table-hx66s" align="center">
<tr>
   <td class="a1" height="23">&nbsp;&nbsp;&nbsp;<a href=default.asp>论坛首页</a> → <a href="list.asp?bid=<%=bid%>"><%=bbs_title%></a> → 贴子列表</a></td>
   <td class="a1" align="right"><a href="bbs_admin.asp?bid=<%=bid%>">[登陆本版管理]</a>&nbsp; → &nbsp;版主:<%call showbbsadmin()%></td>
   </tr>
</table>
<%
end sub
'------------------------------------------------------------------------------------------
sub bbs_show_top()
%>
<table width="760"  border="0" cellspacing="0" cellpadding="0" class="table-top" align="center">
      <tr>
        <td height="2" background="img/topLine.gif"></td>
      </tr>
</table>
<table width="760"  border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="table-hx66s">
  <tr>
    <td valign="top"  bgcolor="#FFFFFF" background="../skin/<%=bbsskin%>/banner.gif" height="130"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="300" height="108">
              <param name="movie" value="../img/top1.swf">
              <param name="quality" value="high">
              <param name="wmode" value="transparent">
              <embed src="../img/top1.swf" width="300" height="108" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"> 
              </embed> </object></td>
      </tr>
</table>
<table cellSpacing="0" cellPadding="0" width="760" border="0" align="center">
  <tr>
    <td height="25" width="500"  class="a1">&nbsp;&nbsp;&nbsp;<a href="javascript:history.back()"><b>返回前页</b></a></td>
    <td height="25" width="260"  class="a1" align="right">&nbsp;&nbsp;</td>
   </tr>
</table>
<%
end sub
'------------------------------------------------------------------------------------------
sub bbs_foot()
dim enddtime:enddtime=timer()
%>
<table width="760"  border="0" align="center" cellspacing="0" cellpadding="0"  class="table-hx66s">
      <tr>
        <td height="23"  class="a1"> </td>
      </tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="table-hx66s" bgcolor=#FFFFFF>
  <tr>
    <td valign="top" height="6"></td>
  </tr>
  <tr>
    <td align="center" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
       <tr>
         <td height="20" align="center" valign="TOP"><a href='../about.asp'>关于本站</a> | <a href='../about.asp?hx66=lx'>联系我们</a> | <a href='../about.asp?hx66=gg'>广告合作</a> | <a href='../about.asp?hx66=dt'>网站地图</a> | <a href="../link.asp">友情连接</a>  | <a href='../admin.asp' target='_blank' Title='后台管理'>后台管理</a> | <script language='JavaScript' src='../counter.asp'></script><SCRIPT language="javaScript" src="../blog_menu.asp?id=bbs" type=text/javascript></SCRIPT></td>
      </tr>
      <tr>

⌨️ 快捷键说明

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