教你5分钟做成一个ASP论坛 [在线交流800029900] 教大家用asp做个非常简单的论坛!用自己的论坛感觉多舒服 做论坛其实并不难,只要你掌握了几句精华的asp语法,就能搞定。现在我献丑了! 一、建立文件! 最简单的论坛也要有几个必要的文件,就是: 1、数据库,用来储存发表的帖子!-------命名为:bbs.mdb 2、有数据库就必须连接数据库,该文件用来连接数据库:----命名为:conn.asp 3、发表帖子的文件----命名为:say.asp 4、保存发表帖子内容的文件-----命名为:save.asp 5、显示帖子标题的文件------命名为:index.asp 6、显示帖子内容的文件,即点击标题后所进入的页面-----命名为:show.asp 建立文件是可以先建立文本文档,他的格式为文件名.txt,我们只需把它改为文件名.asp 二、各文件的主要内容 1、bbs.mdb 打开这个数据库,建立一个表,命名为bbs 该表中有几个字段 id(自动给帖子编号),他的数据类型设为“自动编号” name(用来储存发表的作者),数据类型为“文本” title(用来储存帖子的主题),数据类型为“文本” body(用来储存帖子的内容),数据类型为“备注” 2、conn.asp 源代码为: % Server.scriptTimeout=10 c+server.mappath(bbs.mdb+;DefaultDir=;DRIVER={Microsoft Access Driver (.mdb)}; set conn=Server.CreateObject(ADODB.connection conn.open connstr % 这个文件就是这样,代码内容大家就自己研究,这个我也不知道怎么说才好! 3、say.asp 源代码为: form method=POST action=save.asp p大名:input type=text name=name size=20p p标题:input type=text name=title size=91p p内容:p ptextarea rows=11 name=body cols=97textareap p p pinput type=submit value=提交 name=B1input type=reset value=重置 name=B2p form 大家应该看得懂的,这个根本就是html语法,对的,根本就是,这个只是发表的界面 不过要注意这一句form method=POST action=save.asp,他把用户所填的内容发送至save.asp这个文件,下面就看save.asp这个文件吧! 4、save.asp 源代码: !--#include file=conn.asp-- %name=Replace(Request.Form(name,','' title=Replace(Request.Form(title,','' body=Replace(Request.Form(body,','' % %if name= or title= or body= then% 请a href=javascripthistory.go(-1)后退a填写完整资料,你才能发表帖子! %else% %set savebbs=conn.execute(insert into bbs(name,title,body)values('&name&','&title&','&body&')% 发表成功!a href=index.asp查看帖子a %end if set savebbs=nothing % 第一句:!--#include file=conn.asp--,意思是插入conn.asp文件,即与数据库进行连接! asp语句必须用% %这个格式包含起来,而插入文件的语句就不用, 接下来几句: name=Replace(Request.Form(name,','' title=Replace(Request.Form(title,','' body=Replace(Request.Form(body,','' “Replace(Request.Form(name,',''”意思是接收表单中名为name的文本框发来的数据, 而“name=Replace(Request.Form(name,',''”则是把发来的数据储存在name变量中, 如果你这样:“abc123=Replace(Request.Form(name,',''” 就是把表单中名为name的文本框发来的数据储存在abc123变量中 接着:if name= or title= or body= then 判断name、title和body变量中是否没有填写内容,即为,如果这样,就执行这一语句: “请a href=javascripthistory.go(-1)后退a填写完整资料,你才能发表帖子!” 该语句属于html语法,大家都看得懂的! %else%就是说“当if……then不成立(即是说所有内容都已经填写)”,就执行语句: “%set savebbs=conn.execute(insert into bbs(name,title,body) values('&name&','&title&','&body&')% 发表成功!a href=index.asp查看帖子a” set save=conn.execute属于固定的语句,不过savebbs可以自己修改,=后面的就难解释了: insert into bbs(name,title,body)意思是向名为bbs的表(在建立数据库时已经建立的表) 中的name,title,body字段插入,插入什么呢?看接下的values('&name&','&title&','&body&') values是“值”的意思 就是插入向量name,title,body,向量用格式'&name&'表示 最后:end if就是结束if……then set savebbs=nothing可以说是关闭掉: set savebbs=conn.execute(insert into bbs(name,title,body) values('&name&','&title&','&body&') 5、index.asp 源代码: !--#include file=conn.asp-- ba href=say.asp发表帖子ab div align=center center table border=0 cellpadding=0 cellspacing=0 style=border-collapse collapse; bordercolor=#000000 width=100% height=26 tr td width=17%b作者btd td width=83%b主题btd tr table center divhr size=1 %i=1 set showbbs=conn.execute(selectfrom bbs order by id desc do while not showbbs.eof % div align=center center table border=0 cellpadding=0 cellspacing=0 style=border-collapse collapse; bordercolor=#000000 width=100% height=20 tr td width=17%%=showbbs(name% td td width=83% a href=show.aspid=%=showbbs(id%%=showbbs(title%atd tr table center divhr size=1 %i=i+1 if i50 then exit do showbbs.movenext Loop showbbs.Close set showbbs=nothing % 这个文件就不一句一句的讲了 主要讲精华部分: set showbbs=conn.execute(selectfrom bbs order by id desc 意思是:向数据库中的bbs数据表查询数据,并以id排顺序, 还有这么一句:%=showbbs(name% 就是显示数据表中的name字段的数据,这里的showbbs就是set showbbs=……中的showbbs 代码中的i=1和i=i+1 if i50 then exit do showbbs.movenext Loop showbbs.Close set showbbs=nothing 这几句属于循环语句,这里就不理他,理解了也不太好用,因为他只显示50张贴子! if i50 then exit do中的50可以修改 但我们做论坛必须把帖子分页,又因为分页这个语句太复杂,我想就不讲了,等这一个弄懂了才来弄 还有一句很有用的: a href=show.aspid=%=showbbs(id%%=showbbs(title%a 里面的超连接:show.aspid=%=showbbs(id%,注意:这里的超连接把帖子的id包含了, 等一下在show.asp文件中就有用了 5、show.asp 源代码: !--#include file=conn.asp-- %id=request.querystring(id% %set show=conn.execute(selectfrom bbs where id=&id&% a href=index.asp b回到首页ba ba href=say.asp发表帖子ab hr size=1 table border=1 cellpadding=0 cellspacing=0 style=border-collapse collapse bordercolor=#111111 width=100% height=180 tr td width=21% height=22b作者:b%=show(name%td td width=79% height=22b主题:b%=show(title%td tr tr td width=100% colspan=2 height=158 valign=topb 内容:b%=show(body%td tr table%set show=nothing% 劲语句---精华语句: id=request.querystring(id 在讲解index.asp文件的后面已经说到:show.aspid=%=showbbs(id这一句, id=request.querystring(id就是把地址栏中的id的值读取下来, 因为index.asp文件中的超连接点击后,地址栏就为http…………show.aspid=数字, 所以show.asp使用id=request.querystring(id语句把数字读取下来 于是接着使用:set show=conn.execute(selectfrom bbs where id=&id& 向数据表查询id为这时读取下来的数字的帖子,即where id=&id& 最后%set show=nothing% 好了,论坛就做成了,里面的精华你就去吸取! 当然论坛不可能这么简单,他还有许多文件需要你去制作,这里讲的只是个别必需的功能. 商务虚拟主机和智能建站:试用详情点击进入 电话:0756-3810516 QQ 800029900 全国免费销售热线:400-680-2000 主机-虚拟主机-时代互联(www.now.cn )全国五强虚拟主机提供商,CNNIC五星级 ... 虚拟主机领先提供商-时代互联为全球十多万客户提供卓越的虚拟主机,名列全国5强虚拟主机提供商,CNNIC五星级认证服务商!十年品质,百年企业-时代互联,拥有专业的虚拟主机 ... www.now.cn/vhost 更多相关的关键字:主机,java虚拟主机,虚拟主机,java空间,java主机