ASP聊天室制作.doc

《ASP聊天室制作.doc》由会员分享，可在线阅读，更多相关《ASP聊天室制作.doc（32页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、ASP聊天室制作这次我为大家介绍的是我第一个用ASP做的程序-聊天室，很简单，没用数据库，但是对于还未学到ADO的同志是个比较好的参考例子，这个例子基本包括了所以ASP的五个内置对象，但是有了聊天室的雏形，如果水平到家可以在此基础上做的强大好看点好了，废话不说了，现在进入正题吧！首先这个程序有四个部分组成，分别是index.asp,chat.asp,show.asp,input.asp首先调用chat.asp然后就可以运行了！作为一个初学者，我觉得写一个程序整体观念很重要，也就是说你首先要确定要实现什么样的功能，然后再进行各个功能的分块和解决，那么作为一个简单的聊天室我觉得首先要有一个登陆界面

2、，登陆后进入一个聊天室的主界面，主界面又分为两个块，上面一块是聊天显示的内容，下面一块是聊天者写入的文字并进行发送。确定好各个功能版块后，然后我们各个去实现！好，先解决登陆界面吧，这个容易，html随便做个表单，我做的很简单： 欢迎光临小型聊天室 聊天室用户登陆用户名密 码 好了，做好了这么个简单的登陆页面后下面我们进入主页面的制作。上面我们做了个简单的登陆页面，现在开始做我们的主界面chat.asp： 这个程序主要实现的是提取index.asp的表单数据，然后判断是否用户有填写用户名，如果没有回到登陆界面，同时设立了cookies和session变量以用于其他文件的调用。做好了以后我们转入编

3、写input.asp文件，也就是用户输入聊天内容的部分：欢迎光临小型聊天室说：这段代码很简单，有一个地方初学者可能会看不懂，target是实现将写入的内容送到show的框架，而不是被直接在自己的框架里！读者可以体会一下把target去掉，接下来我们做最后一个部分也就是show.asp部分%mytalk=trim(request.form(putword)if mytalkthenapplication.lockapplication(show)= & request.cookies(cname) & : & & mytalk & & & application(show)application

4、.unlockend if%欢迎光临小型聊天室由于没有应用数据库，这段代码主要的部分是用application来实现对聊天内容进行共享好了，很简单的一个聊天室做好了，呵呵！不要见笑啊！ASP+ACCESS制作留言程序本文章来自 21视频教程网 ASP+ACCESS制作留言程序_Asp教程 原文链接：准备ASP环境 | IIS(Internet Information System，可以通过系统组件添加) 或 新生命专用Web服务器( 本站下载 官方下载)(我主要使用这种)ACCESS | 很容易安装的数据库程序，属于office 组件，很多Windows系统中已安装好。ASP手册 | 可要可不

5、要，毕竟此教程比较简单，没用到太多概念的东西。Dreamweaver cs3 | 主要是利用里面的站点测试站点，以及具有语法提示语法着色的代码编辑环境。十天学会ASP | 最好你也去关注一下，因为我是通过这篇教程改编的。HTML | 搜索相关知识第一课（ASP环境调试与Dreamweaver站点建立）1、把下载好的新生命专用Web服务器放置到D:ASPweb目录，双点运行。2、运行Dreamweaver cs3 建立站点，设置本地根文件夹D:ASPweb3、设置测试服务器，服务器模型： ASP Vbscript，访问：本地/网络 ，测试服务器文件：D:ASPweb4、新建页面test.asp，

6、在之间添加 5、F12进行预览，看到结果为计算机系统当前时间：2009-3-29 17:03:58ASP+ACCESS制作留言程序(第二课)第二课 ASP接收表单数据1、表单与表单对象一个留言页面就是一个表单页面,而页面中可以用来填写信息的文本框以及按扭都属于表单的对象。在HTML中，表单是使用标签进行标记。2、制作表单页面 add.asp 用户 邮箱 留言提示：利用Dreamweaver制作会非常便捷；红色外框线是表单；表单对象要放表单里面；文本框ID必须注意命好名（接收页面要根据名字进行接收数据）；表单属性action要求指定提交给对方的ASP页面名称。3、制作接收页面 addProces

7、s.asp复制内容到剪贴板代码:%user = request(”user”)email = request(”email”)message = request(”message”)response.Write (user)response.Write (”)response.Write(email)response.Write (”)response.Write(message)%提示：request （请求）；esponse.write （向浏览器输出)；” (换行符)。 第三课 连接数据库与添加记录对于数据库的简单理解，放到第四天课来讲，这次任务是要完成连接数据库并且对数据库进行添加记录

8、目前的站点目录准备将 data.rar 下载，解压放置在D:ASPweb目录步骤1、add.asp 代码不变:复制内容到剪贴板代码: 用户 邮箱 留言2、addProcess.asp 代码进行适当修改：复制内容到剪贴板代码:%set conn=server.createobject(”adodb.connection”) 创一个ado组件对象，用于连接数据库conn.open “driver=microsoft access driver (*.mdb);dbq=”&server.mappath(”Data.mdb”) 执行连接user = request(”user”) 接收数据并临时保存e

9、mail = request(”email”)message =request(”message”)message = replace(message,chr(13),”) 把内容中换行的字符编码替换成HTML换行标签message = replace(message,chr(32),” ”) 把内容中空格的字符编码替换成HTML空格识别符exec=”insert into guestbook(user,email,message)values(”+user+”,”+email+”,”+message+”)” 添加记录的sql语句conn.execute exec 执行sql语句re

10、sponse.write “记录添加成功!”%3、注意问题：add.asp中的表单的action是指向addProcess.asp页面；表单对象命名与request接收时名称要对应；储存request值的变量名与sql语句的变量名对应； 在sql语句中单引号与双引号的关系；单个单引句为单行注释符；测试成功会在页面上显示“记录添加功能”字样。 第四课:数据库认识及ASP连接数据库方法数据库顾名思义,就是用来存放数据的一个”仓库”。它有很多种类，例如我常用的Access数据库，MS-SQL，也有PHP的搭档Mysql数据库等等。其中 Access数据库的扩名为： mdb创建表表与记录数据库由表组成

11、，表里面可以存放很多很多条记录。连接Access的语句set conn=server.createobject(adodb.connection) 创一个ado组件对象，用于连接数据库conn.open driver=microsoft access driver (*.mdb);dbq=&server.mappath(数据库名.mdb) 执行连接往往我们很难背出这段语句，这里介绍一个不错的方法来得到这个连接语句：在桌面新建一个UDL格式文件，双击进行简单设置，再用记事本(Notepad)打开，你会发现代码已经出来了。:对于这么多种类的数据库，一般情况我们都会使用Access(*.mdb)，因

12、为它移植方便，使用简单。它是微软Office软件包里面的一个组件。但是它也有它不足之处- 安全性不够，加了用户级密码容易破解,如果做为服务器的话，对服务器要求很高，否则容易造成 MDB 损坏.- 并发数255，但是对高强度操作适应性差，如果服务器不够好，网络不够好，编程的方法不够好，多人同时访- 问就能导致 MDB 损坏.- 不能脱离 ACCESS 或者 ACCESS RUNTIME 环境，该环境相对其他软件体积较大（50M左右）。- 每个数据库文件最大限制只有2G，对于大型网站显然不能够胜任。本文章来自 21视频教程网 ASP+ACCESS制作留言程序_Asp教程 原文链接：聊天室ASP制作

13、chat.asp%name=trim(request(name)if len(name)0 thensession(name)=nameitems=split(application(people),)if ubound(items)=100 thenresponse.write 人满，请稍后进入session.abandonresponse.endend ifapplication.lockapplication(people)=application(people)&name&,application(name)=欢迎&name&进入聊天室!application.unlock%请加入绿色

14、聊天室欢迎进入聊天室您的昵名：content.asp聊天内容%name=session(name)if session(name) thenresponse.write application(name)else%请您进入聊天室main.asp 聊天室浏览不支持talker.asp聊天人员%if session(name) then%聊天者:%items=split(application(people),)response.write&-&_session(name)&-&for i=0 to ubound(items)-1if session(name)items(i)thenrespon

15、se.write&-&_items(i)&-&end ifnextelse%请你离开talking.asp%quit=request(quit)if quit=退出 thenname=session(name)items=split(application(people),)application.lockapplication(people)=for i=1 to ubond(items)-1if items(i)name thenapplication(people)=application(people)&items(i)&,end ifnextapplication(name)=app

16、lication.unlocksession.abandonresponse.endelsewho=request(who)if who=all thenwho=大家end ifif request(content) thenname=session(name)str=&name  对 &who &request(face)&说：_&request(content)&items=split(application(people),)application.lockif request(who)=all thenfor i=0 to ubound(items)-1a

17、pplication(items(i)=str&application(items(i)nextelsefor i=0 to ubound(items)-1if items(i)=name or items(i)=who thenapplication(items(i)=str&application(items(i)end ifnextend ifapplication.unlockend if%兰色黄色绿色红色灰色黑色白色后台要实现的功能：1) 后台只能由管理员登录，并设有一个密码保护。2) 管理员可以通过后台进行对文章及练习的添删改查。3) 管理员可以对用户进行管理。基于以上功能，前台通

18、过以下11个文件予以实现，分别是： login.asp 登录文件conn.asp 链接文件index.asp 主欢迎界面文件chkSession.asp 非法登录文件chkLogin.asp 判断登录信息文件save.asp 保存进度文件article.asp 测试篇课文文件catechism.asp 习题文件aftermath.asp 解析文件error.asp 错误信息页面logout.asp 返回登录页面后台通过以下6个文件予以实现，分别是： login.asp 登录文件index.asp 主界面文件 checkSession.asp 非法登录文件loginChk.asp 密码验证网页o

19、ut.asp 返回登录页面error.asp 错误信息页面1、 数据库连接。ASP与Access数据库连接：2登陆前后index.asp页面区别代码首先在login.asp页面判断并将username等值存入sessionset rs=server.createobject(adodb.recordset)sqlc=select * from userinfo where username=&request.Form(username)& and password=&password&rs.open sqlc,conn,1,1if rs.eof thenresponse.Write(error

20、)response.End()elsesession(uName)=rs(username)session(uID)=rs(id)session(uGroup)=rs(userGroup)end ifrs.closeset rs=nothingresponse.Redirect(change.asp)在index.asp页面存放登录框的表格中：loginbox代码登陆后显示信息的代码也可将login和登陆后显示信息的代码做成一个.asp页面在用调用loginbox代码：会员登陆 用户名： 密码：   登陆后显示信息的代码：会员登陆   欢迎登陆 您登陆的时间是： 3、 asp做注册页面源代码1，（index.asp 用户登陆页面）会员会员注册系统用户名:密码:注册2，（login.asp 用户数据处理文件）%打开数据库判断用户是否存在,info为表名,