用ASP制作简单聊天室
开篇：润墨网以专业的文秘视角，为您筛选了一篇用ASP制作简单聊天室范文，如需获取更多写作素材，在线客服老师一对一协助。欢迎您的阅读与分享！
摘要：聊天室设计的原理是把发言插入到数据库的表里，然后再读了取表中的记录显示在客户端的浏览器上，如何来驱动聊天记录的更
>> 用asp制作简单聊天室 基于ASP的网络聊天室实现 基于ASP的聊天室系统的开发 基于ASP的聊天室制作技术 聊天室 会员聊天室 逃离聊天室 DOGFANS聊天室 少年作家聊天室 雪精灵聊天室 微博聊天室 多多熊聊天室 Chat Room 聊天室 Chat Room聊天室 基于socket的简单聊天室的设计与实现 用ASP制作简单的网络考试系统 聊天室的紧急呼救 网络聊天室设计方法探讨 西子姐姐聊天室 / 我喜欢 歌剧聊天室：为爱而生 常见问题解答 当前所在位置：，是本文要解决的问题。主要是思想是在fjchat.htm用内嵌式框架把chat.asp放在表格的一个单元格，表单放在另外一个单元格里。下面是具体实现
过程，为便于理解，把其他一些功能全部去掉，只留下能发言，并把发言显示出来。
3环境设置
在盘中建一个文件，命名为”myweb”，如果你的操作系统是上海政府版Windows XP，还要在菜单”工具”-＞”文件夹选项”-＞”查看”，去掉”简单文件共享(推荐)”，然后在”myweb”文件夹的属性中选”安全”卡，添中一个用户”everyone”，并给予”写入”，这样用户才能对数据表有插入，更新权利。设置主目录：“控制面版”-＞“管理工具“-＞”internet信息服务”-＞”默认网站“-＞属性-＞”主目录”，把才建的”myweb”设为主目录。最好把”写入”选项”勾上。其他的地方暂时可不设置。
4 数据库设计
为了简单起见，我们用Access数据库，在”myweb”文件夹下放一个db1.mdb数据库，其中只有一个ly表，用来存放用户聊天信息，如下表：
5 聊天信息处理页面formch.asp
只设计表单传递过来两个变量，用户名(user)，留言(ly)，下面这段程序是把这两个变量的值存入表ly中，完成之后，跳转到fjchat.asp
＜%
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("db1.mdb")
user=request.Form("user")
ly=request.Form("ly")
exec="insert intoLy(user,ly) values ('"+user+"','"+ly+"')"
conn.execute exec
conn.close
set conn=nothing
‘用response对象的redirect方法跳转到ly.html页面，用户可以断续留言。
response.Redirect("ly.html")
%＞
6 聊天内容浏览的页面chat.asp
--下一行说明每隔30秒刷新一次这个页面
＜html＞
＜htead＞
＜meta http-equiv=refresh content="30"＞
＜/head＞
＜body＞
＜%
set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq=" & server.MapPath("db1.mdb")
sql="select * from ly order bysj desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
ifnot rs.eof then
%＞
＜div align="center"＞＜font size="5"＞ 全部留言＜/font＞＜/div＞
＜table width="100%" align="center" border="1" cellspacing="0" cellbadding="0"＞
＜tR ＞＜font size=5＞＜TD width="10%" ＞用户名＜/td＞＜td width="70%"＞留言＜/td＞＜td width="20%"＞留言时间＜/td＞＜/font＞＜/tr＞
‘下面6行是逐条显示记录,我用一个表格来显示
＜% do while not rs.eof %＞
＜tR＞＜TD＞＜% =rs(“user”)＞%＞＜/td＞＜td＞＜%=rs("ly")%＞＜/td＞＜td＞＜%=rs("sj")%＞＜/td＞＜/tr＞
＜tr ＞＜td bgcolor="#00CC33" height="5" colspan="3" bordercolor="#0033FF"＞＜/td＞＜/tr＞
＜%rs.movenext %＞
＜%loop %＞
＜/table＞
＜%else %＞
没有留言
＜% end if%＞
＜%
rs.close
set rs=nothing
conn.close
set conn=nothing
%＞＜br /＞
＜/body＞
＜/html＞
7 附加内嵌式框架做聊天室页面fjchat.htm
下面把聊天表单与聊天内容显示放到一个页面上去,为了使页面稳定,各用户刷新显示页面时不影响聊天界面,用一个内嵌框架来放聊天内容,这是一个重点,刷新页面只刷新一个页面的一部分｡
＜body＞
＜table width=＂760＂ border=＂1＂ align=＂center＂ cellpadding=＂0＂ cellspacing=＂0＂＞
＜tr＞
‘这一单元格里放了一个内嵌式框架,width,height是它的宽和高,scr=”lyla.asp”是把聊天内容显示在这里,name的值一定要是＂main＂
＜td＞＜iframe width=＂760＂ height=＂400＂ src=＂lyla.asp＂ scrolling=＂yes＂ name=＂main＂frameborder=＂2＂＞＜/iframe＞＜/td＞＜/tr＞
＜tr＞
‘这个单元格只放了一个表单,表单中只一个名称为user的文本框和名称为ly的文本区域,主要是为了表单处理程序formcn.asp相对应,把表单提交给formcn.asp处理｡
＜td＞＜form name=＂form1＂ method=＂post＂ action=＂formcn.asp＂＞
＜p＞用户名:
＜input name=＂user＂ type=＂text＂ ＞
＜/p＞ ＜p＞发言:＜input name=＂ly＂ type=＂text＂ size=＂40＂ /＞
＜input type=＂submit＂ name=＂Submit＂ value=＂ok＂ /＞
＜input type=＂reset＂ name=＂Submit2＂ value=＂cancel＂ /＞
＜/p＞
＜/form＞＜/td＞＜/tr＞
＜/table＞
＜/body＞
一个简单的聊天室的网页基本做成,把它放到局域网上去,用几台机子测试一下｡感受下你的学习成果｡
参考文献:
[1] 邓文渊.ASP与网络数据库技术[M].北京:中国铁道出版社,2004.
[2] 冯静哲.Access数据库应用[M].北京:清华大学出版社,2006.
[3] 姚怡.网站建设与管理[M].北京:中国铁道出版社,2003.