skinpagetop.asp

功能强大的一个b/s工作站

<% select case skinid %>
<% case 50 %>
<!--#include file="skin_lyanrtop.asp"-->
<% case 76 %>
<!--#include file="skin_lstktop.asp"-->
<% case 78 %>
<!--#include file="skin_chhjqtop.asp"-->
<% case 79 %>
<!--#include file="skin_zsshjtop.asp"-->
<% case 80 %>
<!--#include file="skin_redtop.asp"-->
<% case 81 %>
<!--#include file="skin_newbluetop.asp"-->
<% case 82 %>
<!--#include file="skin_xqyytop.asp"-->
<% case 83 %>
<!--#include file="skin_dsystop.asp"-->
<% Case Else %>
<div id=menuDiv style='Z-INDEX: 2; VISIBILITY: hidden; WIDTH: 1px; POSITION: absolute; HEIGHT: 1px; BACKGROUND-COLOR: #9cc5f8'></div>
<table cellspacing=0 cellpadding=0 align=center style="border:1px <%=Forum_body(27)%> solid; border-top-width: 0px; border-right-width: 1px; border-bottom-width: 0px; border-left-width: 1px;width:<%=Forum_body(12)%>;">
<tr><td width=100%>
<table width=100% align=center border=0 cellspacing=0 cellpadding=0>
<tr><td class=TopDarkNav height=9></td></tr>
<tr><td height=70 class=TopLighNav2>
<TABLE border=0 width="100%" align=center>
<TR>
<TD align=left width="25%"><a href="<%= Forum_info(3) %>"><img border=0 src='<%= Forum_info(6) %>'></a></TD>
<TD Align=center width="65%">
<%if isnull(Forum_ads(0)) or Forum_ads(0)="" then%>
<%else%>
<%=Forum_ads(0)%>
<%end if%>
</td>
<td align=right style="line-height: 15pt" width="10%">
<a href=#><span style="CURSOR: hand" onClick="window.external.AddFavorite('<%=Forum_info(1)%>', '<%=Forum_info(0)%>')">加入收藏</span></a>
<br><a href="mailto:<%=Forum_info(5)%>">联系我们</a>
<br><a href="boardhelp.asp?boardid=<%=boardid%>">论坛帮助</a>
</td>
</td></tr>
</table>
</td></tr>
<tr><td class=TopLighNav height=9></td></tr>
        <tr> 
          <td class=TopLighNav1 height=22  valign="middle">
<!-- 导航 -->
<%if not founduser then%>
&nbsp;<a href="login.asp">登陆</a> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="reg.asp">注册</a>
<%else%>
<%if userhidden=2 then%>&nbsp;<a href="cookies.asp?action=hidden&userid=<%=userid%>">隐身</a><%else%><a href="cookies.asp?action=online&userid=<%=userid%>">上线</a><%end if%> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="login.asp">重登陆</a> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="usermanager.asp" onMouseOver='ShowMenu(manage,100)'>用户控制面板</a>
<%end if%>
 <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="query.asp?boardid=<%=boardid%>">搜索</a> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="#" onMouseOver='ShowMenu(stylelist,100)'>自选风格</a> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="boardstat.asp?boardid=<%=boardid%>" onMouseOver='ShowMenu(boardstat,100)'>论坛状态</a> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="show.asp?boardid=<%=boardid%>" onMouseOver='ShowMenu(downlist,100)'>论坛展区</a>
 <!--加入插件管理器开始-->
 <%
 set rs= server.createobject ("adodb.recordset")
 sqlzhu = "select * from zhu order by zhuid"
 rs.open sqlzhu,connplus,0,1
 if not (rs.bof and rs.eof) then
 do while not rs.eof
 response.write " <img src="&Forum_info(7)&"navspacer.gif align=absmiddle> <a onMouseOver='ShowMenu(plus"&rs("zhuid")&",100)' href='#'>"&rs("zhuname")&"</a>"
 rs.movenext
 loop
 end if
 rs.close
 set connplus=nothing
 %>
 <!--加入插件管理器结束--><%if founduser then%> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="logout.asp">退出</a><%else%> <img src=<%=Forum_info(7)%>navspacer.gif align=absmiddle> <a href="dispuser.asp?boardid=<%=boardid%>&action=permission">我能做什么</a><%end if%>
<%if master then response.write " <img src="&Forum_info(7)&"navspacer.gif align=absmiddle> <a href=admin_index.asp>管理</a> <img src="&Forum_info(7)&"navspacer.gif align=absmiddle> <a href=""recycle.asp"">回收站</a>"%>
<!-- 导航 -->
			</td>
        </tr>
</table>
</td></tr>
</table>
<% end select %>