做网页用的小型服务器,ASP:用ASP打造一个小型的网页BBS系统
传统的网页BBS大多是采用CGI模式实现的,它的实现要求编程者既要掌握编程语言如Perl或C等,又要了解关于CGI模式的各项技术内容,因此要制作自己的网页BBS确实困难不小。ASP(Active Server Pages 动态服务器主页)的出现,使我们眼前一亮,能不能利用ASP实现网页BBS呢?回答当然是肯定的。ASP的诱人之处就在于它提供了一种简单易学的脚本,并带有许多内置的对象,从而提供了一条简捷的编程之路。
该BBS主要由用户注册(浏览器端)、用户注册(服务器端)、加帖子(浏览器端)、加帖子(服务器端)、帖子具体内容的显示和回复以及所有帖子的显示六个部分组成,其中用户信息存放在数据库author.mdb中,帖子存放在数据库bbs.mdb中。它们均为ACCESS数据库,结构分别如表1、表2所示。
表1 author.mdb
字段名 数据类型 长度 说明
Authname 文本 24 用户名
Password 文本 10 密码
表2 bbs.mdb
字段名 数据类型 长度 说明
ID 文本 4 帖子的编号
Authname 文本 24 用户名
Subject 文本 80 主题
Content 备注 内容
Adddate 日期/时间 加贴的日期
Visitnum 数字 长整型 访问人数
Answernum 文本 4 所回复帖子的编号
(缺省为本身的编号)
Addtime 日期/时间 加贴的时间
Topnum 文本 4 第一层回复帖子的编号
具体实现方法如下所示,其中asp文件和数据库存放在“/hosp/asp"中,其它htm
文件存放在“/hosp"文件中,img文件存放在“/hosp/images"。
1、用户注册(浏览器端)login.htm:由用户输入相关信息,通过表单传送到服
务器。
以下是引用片段:
register a new user
为了标识方便,请您注册一个用户名称
用户:
密码:
返回论坛
2、用户注册(服务器端)Register.asp:利用REQUEST.FORM("表单栏位名")接收表单信息,采用ADO技术与数据库author.mdb连接,并将表单信息存入author.mdb中。
以下是引用片段:
存用户信息
code=REQUEST.FORM("password")
Set Connection=Server.CreateObject("ADODB.Connection")
Connection.Open "author"
Set RS=Connection.Execute("SELECT * FROM author")
If Not RS.EOF Then %>
该用户名已被注册,请您重新注册新用户名!
Connection.Execute("INSERT INTO author(authname,password) Values('" &name& "','" &code& "')")
RS.Close
Connection.Close %>
您已注册成功!
返回论坛
3、加帖子(浏览器端)bbs_add.htm:由用户输入待加入帖子的相关信息,并传到服务器。
以下是引用片段:
a sample form
姓名: 密码:
主题:
内容:
4、加帖子(服务器端)bbs.asp:接收帖子内容,并存入bbs.mdb中。
以下是引用片段:
bbs.asp
code=REQUEST.FORM("code")
subject=REQUEST.FORM("subject")
content=REQUEST.FORM("content")
curdate=Date
curtime=Time
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "author"
Set RS = Connection.Execute("SELECT * FROM author WHERE authname='" &name& "' AND password='" &code& "'")
If Not RS.EOF Then
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set InStream = FileObject.OpenTextFile ("c:inetpubwwwroothospaspdata.id", 1, False, False)
number = Cstr(InStream.Readline+1)
Set OutStream = FileObject.CreateTextFile ("c:inetpubwwwroothospaspdata.id", True, False)
OutStream.WriteLine number
If Request.QueryString("ID")="" Then
manswernum=number
Else
manswernum=Request.QueryString("ID")
End If
If Request.QueryString("topnum")="" Then
mtopnum=number
Else
mtopnum=Request.QueryString("topnum")
End If
Set OutStream = Nothing
Set Connbbs = Server.CreateObject("ADODB.Connection")
Connbbs.Open "bbs"
Connbbs.Execute("INSERT INTO bbs(ID,authname,subject,content,adddate,addtime,answernum,topnum,visitnum) Values('" &number& "','"
&name& "','" &subject& "','" &content& "','" &curdate& "','" &curtime& "','" &manswernum& "','" &mtopnum& "',0)")
Connbbs.Close %>
返回论坛
姓名:
主题:
内容:
您的用户名或密码出错,请您重输!
RS.Close
Connection.Close %>
5、帖子具体内容的显示和回复 detail.asp
以下是引用片段:
bbs.asp
Set Connection=Server.CreateObject("ADODB.Connection")
Connection.Open "bbs"
Set RS=Connection.Execute("SELECT * FROM bbs WHERE ID='" &idnum& "'") %>
姓名:
主题:
内容:
mtopnum=RS(8)
RS.Close
Connection.Close %>
姓名: 密码:
主题:
内容:
返回论坛
6、所有帖子的显示 Dispbbs.asp:列出所有的帖子的主题、作者、时间、访问人数等信息。
以下是引用片段:
dispbbs.asp
Connection.Open "bbs"
Set RS=Connection.Execute("SELECT * FROM bbs WHERE ID=answernum ORDER BY ID DESC")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "bbs"
Set RSNEXT=Conn.Execute("SELECT * FROM bbs")
Do While not RS.EOF %>
-
=RS(4) &" " %>()
ID AND opnum='" &RS(0)& "' ORDER BY ID ASC")
Do While Not RSNEXT.EOF %>
Re:
- ()
Loop
RS.MoveNext
Loop
RSNEXT.Close
Conn.Close
RS.Close
Connection.Close %>
上述程序在Win NT4.0和IIS3.0上实现通过。
做网页用的小型服务器,ASP:用ASP打造一个小型的网页BBS系统相关推荐
- 制作服务器需要哪些,怎么搭建一个小型企业服务器机房,做这些都需要什么
怎么搭建一个小型企业服务器机房,做这些都需要什么? 通过内部部署IT解决方案来减少在线数据存储的安全问题,甚至完全避免这些问题. 但问题又来了,大多数小型企业只能通过投资专用的内部IT设备来成功实现这 ...
- 用mysql做小型数据库,怎样用excel制作一个小型数据库表格 | excel做数据库
Excel 表格类似的数据结构,数据库应该如何设计 想想一个三维的空间: x,y,z 分别表示坐标的 x,y,z 值,为整数(可以为负,如果你在应用里面将0设中点,且允许反方向存储数据的话,x,y 表 ...
- 网页链接不让服务器,苹果手机那个safari浏览器打不开网页,无法与服务器安全链接怎么设置...
safari虽然只有苹果用户才能使用,但是随着苹果用户的增多,不少人遇到safari打不开网页的问题等,safari是苹果手机内置浏览器,在打开网页时经常会出现safari打不开网页因为服务器已停止响 ...
- PS网页设计教程XXVI——如何在PS中创建一个专业的网页布局
作为编码者,美工基础是偏弱的.我们可以参考一些成熟的网页PS教程,提高自身的设计能力.套用一句话,"熟读唐诗三百首,不会作诗也会吟". 本系列的教程来源于网上的PS教程,都是国外的 ...
- 按照一定策略把网页抓回到搜索引擎服务器的,SEO新手学习:搜索引擎的基本步骤...
初始搜索引擎的原理:第一步就是需要了解"搜索引擎的基本步骤". 搜索引擎的基本步骤(大概架构)如下.可以分成虚线左右两个部分:一部分是搜索引擎抓取:主动抓取网页进行一系列处理后建立 ...
- 做好的html 怎么上传到服务器上,怎么上传网页?怎样将做好的网页上传到服务器上?...
怎么上传网页?怎样将做好的网页上传到服务器上?其实把完成的页面或者建站系统上传到购买的网站空间是很简单的.你只需要知道主机空间的IP地址.用户名和密码,就可以通过FlashFXP软件获取.这里小编以主 ...
- 基于Asp.Net Core打造轻量级内部服务治理RPC(一)
继之前的<Asp.Net Core + Docker 搭建>文章末尾说过的,将陆续编写基于asp.net core 打造一个内部服务治理的rpc框架.不过前端时间较忙,所以搁置了一段时间. ...
- asp毕业设计——基于asp+access的网页设计辅导系统设计与实现(毕业论文+程序源码)——网页设计辅导系统
基于asp+access的网页设计辅导系统设计与实现(毕业论文+程序源码) 大家好,今天给大家介绍基于asp+access的网页设计辅导系统设计与实现,文章末尾附有本毕业设计的论文和源码下载地址哦. ...
- Java环境搭建一个小型网页
title: Java环境搭建一个小型网页 #文章標題 categories: "JavaWeb教程" #文章分類目錄 可以省略 tags: 腾讯云服务器Ubuntu6.5系统 前 ...
最新文章
- Freebsd 下用 sshguard 防止暴力破解 ssh 密码
- TCP之超时重传机制
- 中国电力环保设备行业十四五发展形势与投资机会分析报告2022版
- webpack构建Vue项目引入jQ时发生“'$' is defined but never used”的处理
- minecraft服务器_如何启动自己的Minecraft服务器进行多人游戏
- 【51Nod-1100】 斜率最大(贪心)☆双排序
- django-cbv与fbv
- pythonwhile循环love_while循环简介
- Dediprog EM100Pro-G2 安装与配置教程
- apache + phpStudy 配置vue history模式
- Java-Swing编程介绍
- 鳥哥的 Linux 私房菜 -- 例行性工作排程的建立 cron,郁闷一下午
- (推荐)Swift入门级免费视频 - 只需学习8小时
- 微信接入机器人实现对别人消息和群at消息的自动回复
- 电脑键盘的快捷功能,你学会了工作效率提高一半以上
- 信号的扩展是因果_反因果信号的拉普拉斯变换收敛域是
- 解决项目上的红叉和红色感叹号的方法。
- Unity 音频理解与优化
- python集合怎么表示_Python 集合(Set)、字典(Dictionary)
- linux下idea、pycharm等输入中文拼音时满3个字母后无法继续拼音输入(问题带图描述!!)
热门文章
- 命题和命题的否定可以同时成立吗?
- 映射网络驱动器方法 —— 网络硬盘挂载到本地
- C语言练习题,short int型的变量计算两个7位十进制整数的和
- 临床路径在中国的实施现状及路径产品发展前景
- 【产品文档】会议纪要文档模板
- selenium模拟登陆淘宝遇到的问题及解决
- 汉诺塔求次数(用递归)
- Artifact XXX:war exploded: Artifact is being deployed, please wait...(已解决)
- 用c++做双人枪战游戏
- 史上最强数据分析学习笔记(附思维导图),没有之一!!!