聊天室建设详解一 -pc6资讯

您的位置：首页 → 精文荟萃 → 软件资讯 → 聊天室建设详解一

聊天室建设详解一 时间：2004/10/7 19:17:00来源：本站整理作者：蓝点我要评论(0): 一位精通程式设计的大师，在每开发一个项目的时候，往往要经过非常严密的计划，十分严格的求证，否则，辛辛苦苦开发的程序一旦中途发现问题，那往往都是前功尽弃，从头开始。特别是开发一个大型项目，那计划与求证过程比编写程序过程更为重要。

　　然而，如果我们是一位程式设计的初学者，要让我们开发一个例程，我们的做法又往往与上面的做法相反。往往从最简单的实例开始，实现最初步的功能，然后在简单的基础上不断对程序加以改进、完善，使其功能不断增加，发展，强大。

　　我自己有一个习惯：在设计一些中小程式时，我喜欢花更大的精力去探究、去发现它的难点部分，挖掘它的核心部分，然后从其核心开始进行实验性编程。一般一个程式往往有几个难点与核心部分。一旦这些核心部分完成实验，我们便可以胸有成竹的去对整个程式进行规划，如此便可较迅速的完成设计。

　　我们要建设一个聊天室，首先，这个聊天室的整体概况要在我们脑海中要有一个初步的影像，在众多的公共聊天室中，其核心无非是：

　　1、聊天者把语句写入文本或数据库；

　　2、浏览器不断的对文本或数据库进行刷新、读取；

　　3、实时更新在线的客户；

　　4、管理员对聊天者进行踢或IP禁止操作。

　　若是一个初学程式设计，你能够实现写数据库、自动刷新、获取客户IP的实验，那么，实际上建设聊天室也就完成了一大半。首先，要完成这几个实验，我们至少要熟悉一些ASP脚本及一些SQL命令。

　　1、<%IP=Request("REMOTE_ADDR")%>

　　　您的IP地址为：

　　　<%=IP%>

　　　这是一段获取客户IP的脚本,如果你看过《ASP教程》，你应该知道REMOTE_ADDR是

　　　一个服务器环境变量，返回发出请求的远程主机(client)的IP地址。

　　2、<%

　　　Set Conn=Server.CreateObject("ADODB.Connection")

　　　Connstr="DBQ="+server.mappath("chat.mdb")+";DRIVER={Microsoft Access 　　　　Driver (*.mdb)};"

　　　Conn.Open connstr

　　　sql="SELECT * FROM 在线用户表 WHERE 姓名='" & Request("name") & "'"

　　　Set Rs=conn.Execute(sql)

　　　If Rs.Bof OR Rs.Eof Then

　　　　sz = "'" & Request("name") &_

　　　　"', '"& Request("D4") &_

　　　　"', '"& time1 & "'"

　　　　into_db = "INSERT INTO 在线用户表 ( 姓名, 性别, 登陆时间 ) VALUES(" &_

　　　　sz & ")"

　　　　conn.Execute(into_db)

　　　end if

　　　%>

　　　这是一段十分常见的对数据库操作的脚本，其中包含了对数据库的条件查询与记录添加。上面此段程序我们分三部分来分析，如上以空格分隔的三个部分。

　　要使用组件提供的对象，请创建对象的实例并将这个新的实例分配变量名。使用ASP的Server.CreateObject方法可以创建对象的实例，使用脚本语言的变量分配指令可以为对象实例命名，如下例：

　　 Set Conn=Server.CreateObject("ADODB.Connection")

　　这里的变量Conn 是ASP 程序创建的访问数据库的对象实例。

　　我们要访问数据库，首先要必须知道这个数据库在哪里，这个数据库的驱动程序是什么，要指定这两点有两种方法：第一是在服务器端手动创建数据库源名、指定数据库路径、指定数据库驱动程序，这个方法是通过服务器端的控制面版中的 ODBC 来设置的。她的优点是可以限定数据库的访问权限，增加数据库的安全性，缺点是数据库不易移植。

　　再有一种方法是使用 ASP 来指定数据库路径及数据库驱动程序。不必手动对创建数据库源。在此例中，我们用的是第二种方法。server.mappath("chat.mdb")指定数据库路径，DRIVER={Microsoft Access Driver (*.mdb)};指定数据库驱动程序，此例中我们使用的是MS ACCESS 数据库。

　　SELECT是 SQL 查询命令。sql="SELECT * FROM 在线用户表 WHERE 姓名='" & Request("name") & "'"　表示查询数据库chat.mdb中的在线用户表中所有姓名等于Request("name")的人,Request("name")是读取表单中名为 NAME 的数据。

　　Bof 是文件开头，Eof是文件结尾。If Rs.Bof OR Rs.Eof Then...语句往往用于判断数据库中是否存在符合条件的记录，如果为真则记录不存在，如果为假则记录存在。

　　INSERT INTO是SQL中的插入命令，往往用于插入一条记录。

　　上面此段程序，整体的意思就是：查询数据库在线用户表中是否存在用户Request("name")，如果不存在这个用户则把这个用户添加到在线用户表中。

　　3、

　　　这是一条最简单的页面自动刷新脚本，她是HTML脚本，而不是ASP脚本。很简单吧，其意思是每4秒钟刷新一次，但在使用过程中，你会发现会出现有不少问题出现。

文章评论

查看所有0条评论>>