第11章网络程序开发实例书店BBS论坛ppt课件.ppt

《第11章网络程序开发实例书店BBS论坛ppt课件.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第11章网络程序开发实例—书店BBS论坛11.1书店BBS论坛设计11.2书店BBS论坛的实现本章主要介绍网络程序开发实例—书店BBS论坛。通过本章的学习，读者应该掌握以下内容：书店BBS论坛设计书店BBS论坛的实现11.1书店BBS论坛设计本章通过一个简单的BBS例子，完成的主要功能包括发表新文章、回复文章，并且可以统计单击次数和回复文章次数。通过学习读者主要应体会BBS的设计思想。11.2书店BBS论坛的实现BBS论坛实现主要包括8个文件，它们分别如下。①bbs.mdb：数据库文件，用来存储文章信息。②in

2、dex.asp：BBS首页，分页显示文章信息。③odbc_conn.asp：连接数据文件。④function.asp：子程序文件。⑤count_hit.asp：计算单击次数的文件。⑥part.asp：显示文章的具体内容文件。⑦announce.asp：发表新文章文件。⑧re_announce.asp：发表回复文章文件。1．数据库文件bbs.mdb为了保存信息，就要建立数据库，在Access建立数据库文件bbs.mdb，并建立一个表bbs，数据结构如图11-1所示。图11-1bbs数据结构2．BBS首页文件index

3、.asp首页的任务是显示数据库中的文章，并提供发表新文章的超链接。<%dimsql,rs'因为要分页显示查询结果，所以用下面方法创建一个recordset对象sql="select*frombbswherelayer=1orderbysubmit_datedesc"setrs=Server.CreateObject("ADODB.Recordset")rs.Opensql,db,1ifnotrs.bofandnotrs.eofthen'以下主要为了分页显示dimpage_size'定义每页多少条记录变量dimpag

4、e_no'定义当前是第几页变量dimpage_total'定义总页数变量page_size=10'每页显示10条记录ifRequest("page_no")=""then'如果第一次打开，则page_no为1，否则，由传回的参数决定page_no=1elsepage_no=cint(Request("page_no"))endifsession("page_no")=page_no'将page_no存入session,以备其他页返回时用rs.pagesize=page_size'设置每页多少条记录page_tota

5、l=rs.pagecount'返回总页数rs.absolutepage=page_no'设置当前显示第几页'下面一段显示当前页的所有记录dimi,ji=0j=page_size'该变量用来控制显示多少条记录dowhilenotrs.eofandj>0'循环知道当前页结束或文件结尾i=i+1j=j-1%>3．数据库连接文件odbc_conn.asp数据库连接文件的任务是完成连接数据库的操作。<%'连接BBS数据库dimdb,connstrconnstr="DBQ="&Server.Mappath("bbs.mdb")

6、&";DRIVER={MicrosoftAccessDriver(*.mdb)};"setdb=Server.CreateObject("ADODB.connection")db.Openconnstr%>4．自定义函数文件function.asp<%privatesubselect_page(page_no,total_page)response.write"请选择页码:"dimifori=1tototal_pageifi=page_nothenresponse.writei&" "elserespons

7、e.write""&i&" "endifnextendsub%>5．计算单击次数文件count_hits.asp<%response.buffer=true%><%dimbbs_idbbs_id=request("bbs_id")'下面一段将点击次数加1，然后引导至part.asp以显示内容sql="updatebbssethits=hits+1wherebbs_i

8、d="&bbs_id'更新次数db.execute(sql)db.closeresponse.redirect"part.asp?bbs_id="&bbs_id%>6．显示具体内容文件part.asp'以下显示当前记录内容dimsql,rssql="select*frombbswherebbs_id="&bbs_idsetrs=db.execute(sql)