文章显示模块
前面说过,一片具体的文章是分属在看板和主体之下的。因此显示文章也要经过看板列表和主体列表这两页面后,才能得到特定主题下文章的列表。
下面先来看看看板列表的显示页面:
< html>
< head>
< title>看板列表< /title>
< meta http-equiv="Content-Type" content="text/html; charset=gb2312">
< /head>
< %
'打开连接,显示看板列表
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("bbssystem.mdb")
sql = "select * from 看板列表"
set rs=conn.execute(sql)
%>
简单的SQL查询,把所有的看板有关信息传回到纪录集RS中。下面的任务就是显示纪录记得内容,并在相应的看板名称上建立显示看板主题的链接。
< body bgcolor="#FFFFFF">
< h2 align="center">看板列表< /h2>
< table width="60%" border="0" cellspacing="0" cellpadding="0" align="center">
< tr bgcolor="#FFFFCC">
< td height="35" width="25%">看板名称< /td>
< td height="35" width="21%">板主< /td>
< td he
前面说过,一片具体的文章是分属在看板和主体之下的。因此显示文章也要经过看板列表和主体列表这两页面后,才能得到特定主题下文章的列表。
下面先来看看看板列表的显示页面:
< html>
< head>
< title>看板列表< /title>
< meta http-equiv="Content-Type" content="text/html; charset=gb2312">
< /head>
< %
'打开连接,显示看板列表
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("bbssystem.mdb")
sql = "select * from 看板列表"
set rs=conn.execute(sql)
%>
简单的SQL查询,把所有的看板有关信息传回到纪录集RS中。下面的任务就是显示纪录记得内容,并在相应的看板名称上建立显示看板主题的链接。
< body bgcolor="#FFFFFF">
< h2 align="center">看板列表< /h2>
< table width="60%" border="0" cellspacing="0" cellpadding="0" align="center">
< tr bgcolor="#FFFFCC">
< td height="35" width="25%">看板名称< /td>
< td height="35" width="21%">板主< /td>
< td he
| 对此文章发表了评论 |
