|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。章显现模块
后面说过,一片详细的文章是分属在看板和主体之下的。因而显现文章也要经由看板列表和主体列表这两页面后,才干失掉特定主题下文章的列表。
上面先来看看看板列表的显现页面:
<html>
<head>
<title>看板列表</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
</head>
<%
翻开毗连,显现看板列表
Setconn=Server.CreateObject("ADODB.Connection")
conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("bbssystem.mdb")
sql="select*from看板列表"
setrs=conn.execute(sql)
%>
复杂的SQL查询,把一切的看板有关信息传回到记录集RS中。上面的义务就是显现记录记得内容,并在响应的看板称号上创建显现看板主题的链接。
<bodybgcolor="#FFFFFF">
<h2align="center">看板列表</h2>
<tablewidth="60%"border="0"cellspacing="0"cellpadding="0"align="center">
<trbgcolor="#FFFFCC">
<tdheight="35"width="25%">看板称号</td>
<tdheight="35"width="21%">板主</td>
<tdheight="35"width="23%">主题数</td>
<tdheight="35"width="31%">板主上岸</td>
</tr>
这儿一部分是显现出表格中每列的题目,这儿我没有效一个一致的函数来显现RS记录记的内容,由于如许能够对表格的表面微风格做更多的把持,利用起来固然有点贫苦,可是却更加天真。
<%
do
boardid=rs("id")
boardname=rs("称号")
boardmanager=rs("板主")
response.write"<tr><td><ahref=qBoard.asp?boardid="&boardid&"&boardname="&boardname&">"&boardname&"</a></td>"
这一行是重点,当点击了各个板的称号后,能够链接到显现看板主题的页面。代码看起来有点贫苦,我分化了给你讲,你就会分明了。在点击以后,扫瞄器哀求挪用的是qBoard.asp页面,并带有一个参数boardid,代表要显现看板的ID号,在哀求页面和参数之间用问号(?)分开。Boardid是后面设定了的变量,个中包括的就是对应看板的ID号。这个链接中还带有别的一个参数boardname,用来把看板称号传送给qBoard.asp页面。在多个参数间利用“&”来分开。这个参数不是必需的,传送已往是为了以免在qBorad.asp中再次用boardid来查询看板称号。一样平常来讲,可以罕用数据库操纵就应该只管的罕用,如许能够进步ASP页面的功能。
由于Response.Write语句利用字符串作为参数的,以是下面的字符串和变量之间利用的是“&”联合符。最初ASP页面注释的了局应当是像如许的:<td><ahref=qBoard.asp?boardid=1&boardname=体系板>体系板</a><td>
response.write"<td><ahref=qAuthor.asp?author="&boardmanager&">"&boardmanager&"</a></td>"
response.write"<td>"&rs("主题数")&"</td>"
response.write"<td><ahref=managerlogin.asp?boardid="&boardid&">板务处置</a></td></tr>"
在这个表中,除能够由链接来显现看板主题的内容,另有一个斑竹查询部分和板务处置部分,斑竹查询能够是经由过程qAuthor.asp来完成的,它只是复杂的从数据库中掏出作者信息,并显现出来,这儿就未几说了。而板务处置是由managerlogin.asp页面来处置的。这属于文章审视模块,我们前面再说。
rs.movenext
loopuntilrs.eof
%>
经由过程一个do…loop轮回,把记录会合一切的信息都显现了出来。在这个表中,除能够
</table>
<divalign="center"><br>
点击看板称号能够失掉主题列表,点击板主称号能够观察板主信息</div>
</body>
</html>
<%
setrs=nothing
conn.close
setconn=nothing
%>
上面再来看看下面提到的qBaord.asp这个页面:
<%
boardid=request("boardid")‘掏出由上个页面传送过去的看板ID号
Setconn=Server.CreateObject("ADODB.Connection")
conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("bbssystem.mdb")
Setcmd=Server.CreateObject("ADODB.Command")
Setcmd.ActiveConnection=conn
cmd.CommandText="主题列表"
ReDimparam(0)声明参数数组
param(0)=CLng(boardid)CLng不成疏忽
Setrs=cmd.Execute(,param)
%>
<html>
<head>
<title>主题列表</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<</p>缺乏可以共同遵循的行业标准,ASP还处在发展初期,大家对它的理解不同,如产品和服务标准,收费标准等,不利于行业的健康发展。 |
|