📄 board_list.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="opendb.asp" -->
<% homebid=Request("board")
if homebid<>"" then
homebid=cint(homebid)
end if
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<SCRIPT lanuage="JScript">
function turnit(ss)
{
if (ss.style.display=="none")
{ss.style.display="";}
else
{ss.style.display="none"; }
}
</SCRIPT>
<link href="bbs.css" rel="stylesheet" type="text/css">
<base target="main">
<style type="text/css">
<!--
.style1 {color: #BBDDFF}
-->
</style>
</head>
<body bgcolor="#BBDDFF" leftmargin="0" topmargin="0">
<% turnit_id=1
sql="select * from bbs_board order by bid"
set rscust=Server.Createobject("ADODB.Recordset")
rscust.open sql,conn,1,3
If rscust.recordcount>0 then
do while not rscust.eof%>
<DIV style="CURSOR: hand" onmouseup=turnit(bbs<%=turnit_id%>); language=JScript>
<table width="100%" height="24" border="0" cellpadding="0" cellspacing="0" background="images/boardbg.gif">
<tr>
<td width="4%" valign="middle"><img src="images/tree1.gif" width="30" height="19"></td>
<td width="96%" valign="middle"><%= rscust("board") %></td>
</tr>
</table>
</DIV>
<DIV id=bbs<%=turnit_id%> style="<% If rscust("bid")<>homebid Then %>DISPLAY: none;<% End If %>POSITION: relative">
<%
sqlstr="select * from bbs_suboard where bid="&rscust("bid")&" order by subid"
set rs=Server.Createobject("ADODB.Recordset")
rs.open sqlstr,conn,1,3
If rs.recordcount>0 then
do while not rs.eof %>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="4%"><img src="images/tree3.gif" width="30" height="19"></td>
<td width="96%"><a href="main.asp?board=<%= rs("bid") %>&suboard=<%= rs("subid") %>"><%= rs("suboard") %></a></td>
</tr>
</table>
<% rs.movenext
loop
End If %>
</DIV>
<% rscust.movenext
turnit_id=turnit_id+1
loop
set rscust=nothing
End If %>
<DIV style="CURSOR: hand" onmouseup=turnit(info); language=JScript>
<table width="100%" height="24" border="0" cellpadding="0" cellspacing="0" background="images/boardbg.gif">
<tr>
<td width="4%" valign="middle">
<img src="images/tree1.gif" width="30" height="19">
</td>
<td width="96%" valign="middle">资料配置</td>
</tr>
</table>
</DIV>
<DIV id=info style="DISPLAY: none;POSITION: relative">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="4%"><img src="images/tree3.gif" width="30" height="19"></td>
<td width="96%"><a href="user_reg_modi.asp">修改资料</a></td>
</tr>
<tr>
<td><img src="images/tree3.gif" width="30" height="19"></td>
<td><a href="user_reg_modi_pwd.asp">修改密码</a></td>
</tr>
</table>
</DIV>
<table width="100%" height="24" border="0" cellpadding="0" cellspacing="0" background="images/boardbg.gif" bgcolor="#9DC7FF">
<tr >
<td width="4%" height="20" valign="middle"><img src="images/tree1.gif" width="30" height="19"></td>
<td width="96%" valign="middle"><a href="login.asp">进站画面</a></td>
</tr>
</table>
<table width="100%" height="24" border="0" cellpadding="0" cellspacing="0" background="images/boardbg.gif" bgcolor="#9DC7FF">
<tr >
<td width="4%" valign="middle"><img src="images/tree1.gif" width="30" height="19"></td>
<td width="96%" valign="middle"><a href="logout.asp" target="_parent">退出论坛</a></td>
</tr>
</table>
<table width="100%" height="24" border="0" cellpadding="0" cellspacing="0">
<tr >
<td valign="middle">:::::<a href="http://www.cf98.com/" target="_blank">创富98论坛</a>::::::<br>
::<a href="http://www.ys01.com/" target="_blank">洋讯科技技术支持</a>:: </td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -