|新人报到(得20稻币)| |Windows专区| |Linux专区| |MacOS专区| |软件资源区| |杀毒软件| |共享上网论坛| |论坛闲聊区(水区)| |稻草QQ群|

返回列表 发帖

教你5分钟做成一个ASP论坛

教你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主机
转发到微博 收藏 分享

天啊,这么复杂。给额5天也装不起来!

TOP

返回列表