注册
登录
设施
搜索
俱乐部
论坛
私人消息 (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讨论区
游戏专区
新人报到
Win7、Vista专区
系统光盘下载
影音美图
WinXP专区
稻草站务区
论坛公告、使用帮助
使用帮助
论坛公告
论坛事务
稻币发放
友情链接
给我提建议
新人报到
综合广场
电脑诊所(答疑区)
小技巧专区
共享上网论坛
数字校园山寨拨号器
论坛闲聊区(水区)
交易场
娱乐休闲
影音美图
游戏专区
系统之家
Windows讨论区
Win 8/Win8 RT讨论区
Windows Server系统
Win7、Vista专区
WinXP专区
Linux讨论区
Debian|Ubuntu发行版
Redhat|衍生版本
谷歌Google Chrome OS展望台
苹果Mac OS讨论区
Show Leopard专区
黑苹果ForPC
其它操作系统
系统光盘下载
扮靓电脑
美化资源发布(美化包/主题等)
晒桌面
软件世界
软件应用综合交流
磁盘应用区
安全软件论坛
杀毒交流区
软件资源发布区
原创软件发布区
稻草软件工作室
稻草电脑钥匙
程序发布
[收藏此主题]
[关注此主题的新回复]
[通过 QQ、MSN 分享给朋友]
道具
每日签到
稻草语音聊天室
网速测试
全国城市地图
勋章
社区银行
发帖际遇