快捷搜索:

ASP技术在论坛中的运用。(八)

应用Session来维持对斑竹的身份验证,这必须要求客户端浏览器的cookie被打开了。由于Session是经由过程cookie来实现的。在这儿,把看板ID赋给Session变量beenthere,注解斑竹已经经由过程了身份验证。在后面的每个版务处置惩罚的页面中,都要反省beenthere是否和响应的看版ID切合。

url="boardmanager.asp?boardid=" & boardid

response.redirect url

初学ASP的时刻老是为response.redirect这个措施认为利诱,屡用不爽,现在我来奉告你一些技术。应用它之前,必须经由过程response.buffer=true来让ASP页面应用缓冲区。这时,在ASP被解释成HTML代码之前,它是放在缓冲区中的,而不直接被发送的客户端浏览器。还有一个必须要知道的是:在应用response.redirect之前,是不能有任何实际的HTML代码被发送到客户端浏览器的,否则就会掉足。当然也有变通的措施,假如在response.redirect之前已经有HTML代码被解释出来,可以用response.clear措施来清除缓冲区,然后就可以应用它来进行重定向了。

end if

%>

下面的页面,便是在上面身份验证经由过程后重定向的目标:boardmanager.asp。它将列出了所有别有被处置惩罚的文章。

boardid then response.redirect "forums.asp"

这便是查验斑竹身份的地方,由于前面已经经由过程cookie在斑竹的浏览器中作了标记,现在我们就能够经由过程seesion来辨认斑竹的身份了。假如标志不符,就会经由过程response.redirect返回到最开始的登岸页面。假如斑竹浏览器的cookie没有打开,那么seesion(“beenthere“)的值会为空,同样也无法进入这个页面。

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("bbssystem.mdb")

Set cmd = Server.CreateObject("ADODB.Command")

Set cmd.ActiveConnection = conn

sql="select 名称 from 看板列表 where id=" & boardid

set rs=conn.execute(sql)

boardname=rs("名称")

cmd.commandtext="未颁发文章列表"

ReDim param(0) ' 声明

param(0) = CLng(boardid) ' CInt 弗成轻忽

Set rs = cmd.Execute( ,param )

set cmd=nothing

%>

版务处置惩罚

板板务治理

现在没有文章要处置惩罚"

response.end

%>

假如没有新文章被网友宣布,这给出响应的提示,并用response.end来停止此页的显示。

主题

文章标题

作者

日期

" & topicname & ""

response.write "

" & articlename & ""

response.write "

" & author & ""

response.write "

" & datastr & ""

rs.movenext

loop until rs.eof

%>

当点击了响应文章的联络后,就进入此文章的处置惩罚页面managearticle.asp:

boardid then response.redirect "forums.asp"

Set conn = Server.CreateObject("

您可能还会对下面的文章感兴趣: