注册
登录
设施
搜索
俱乐部
论坛
私人消息 (0)
公共消息 (0)
论坛任务 (0)
系统消息 (0)
好友消息 (0)
帖子消息 (0)
稻草软件论坛
»
论坛闲聊区(水区)
» 教你5分钟做成一个ASP论坛
返回列表
回复
发帖
‹‹ 上一主题
|
下一主题 ››
教你5分钟做成一个ASP论坛
发短消息
加为好友
baga08
当前离线
论坛新人(MS-DOS6.22)
转到楼层
»
倒序看帖
打印
字体大小:
t
T
楼主(1 楼):baga08
发表于 2010-2-9 12:01
|
只看该作者
教你5分钟做成一个ASP论坛
主机
,
虚拟主机
,
JAVA虚拟主机
,
JAVA空间
分享到:
QQ空间
新浪微博
开心网
人人网
教你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主机
收藏
分享
大家互帮互助,来这里,你问我答,有问必答!
发短消息
加为好友
mpx220yd
当前离线
8级会员(Win98)
沙发(2 楼):mpx220yd
发表于 2010-2-9 14:32
|
只看该作者
天啊,这么复杂。给额5天也装不起来!
大家互帮互助,来这里,你问我答,有问必答!
TOP
返回列表
回复
发帖
‹‹ 上一主题
|
下一主题 ››
稻草站务区
论坛公告、使用帮助
使用帮助
论坛公告
论坛事务
稻币发放
友情链接
给我提建议
新人报到
综合广场
电脑诊所(答疑区)
小技巧专区
共享上网论坛
数字校园山寨拨号器
论坛闲聊区(水区)
交易场
娱乐休闲
影音美图
游戏专区
系统之家
Windows讨论区
Win 8/Win8 RT讨论区
Windows Server系统
Win7、Vista专区
WinXP专区
Linux讨论区
Debian|Ubuntu发行版
Redhat|衍生版本
谷歌Google Chrome OS展望台
苹果Mac OS讨论区
Show Leopard专区
黑苹果ForPC
其它操作系统
系统光盘下载
扮靓电脑
美化资源发布(美化包/主题等)
晒桌面
软件世界
软件应用综合交流
磁盘应用区
安全软件论坛
杀毒交流区
软件资源发布区
原创软件发布区
稻草软件工作室
稻草电脑钥匙
程序发布
[收藏此主题]
[关注此主题的新回复]
[通过 QQ、MSN 分享给朋友]
道具
每日签到
稻草语音聊天室
网速测试
全国城市地图
勋章
社区银行
发帖际遇