ASP编程入门进阶（十一）：Chat聊天程序

通常的聊天室所采用的程序，也就是Chat程序了，其基本结构原理是不会采用到数据库的。那究竟采用什么技术呢？我们知道ASP变量当中Session变量的作用是记录单个用户的信息，并且能跟踪用户的行为；Application对象的作用则起的全局变量，可以实现站点多个用户之间在页面中共享信息的。

那可以想象，在针对当前聊天程序中，一个聊天成员即为一个Session变量，聊天成员之间的会话则当成Application变量进行共享显示，以使各成员都能看见。

那下面就采用一很经典的实例程序，进行了解和分析。

1，chat.asp





<%If Request.ServerVariables("Request_Method")="GET" then%>
<form method="post" action="chat.asp">
<input type="text" name="nick" value="your nick name"><p>
<input type="submit" value="come in"><p>
<input type="hidden" name="log" size="20" value="1">
</form>
<%Response.End
Else
Response.clear
dim talk
If Request.Form("nick")<>"" then
Session("nick")=Request.Form("nick")
End if
%>

<form method="post" action="chat.asp" name=form1>
<%=Session("nick")%>说话：
<input type="text" name="talk" size="50"><br>
<input type="submit" value="提交">
<input type="reset" value="取消"></p>
</form>
<a href="chat.asp">离开</a><br>

<%
If Request.Form("log")<>1 then
If trim(Request.Form("talk"))="" then
talk=Session("nick")&"不说一句话就想来敷衍大家"
Else
talk=trim(Request.Form("talk"))
End If
Application.lock
Application("show")="来自"&Request.ServerVariables("remote_addr")& "的" &Session("nick")&"在"&time& "的时候说：" &talk& "<br>" &Application("show")
Application.UnLock
Response.Write Application("show")
End if
%>
<%End if%>

简单解释：
1，<%If Request.ServerVariables("Request_Method")="GET" then%>的作用就是判断当前页面接受的方式，如果为GET方式则会显示“要求输入昵称”的表单页。因为页面的默然接受方式为GET，当在URL地址栏直接敲入时，也就是没有任何信息的时候，就应该显示要求“输入昵称”。

2，<input type="hidden" name="log" size="20" value="1">和下面的If Request.Form("log")<>1 then是有关联的：显然第一次输入昵称进入，同样将log隐藏域发送。但作为第一次的进入是无任何语句发言的，所以判断接受的log值不为1，亦即非首次登录（表示已经登录）时，执行内部相关聊天显示程序。

3，trim(Request.Form("talk"))=""，trim就是个函数了：删去字符串前，后的空格。初此，还有rtrim()：去掉字符串后的空格；ltrim()：去掉字符串前的空格。

<script language=vbs>
cnbruce=" This is a Test ！ "
alert("全部显示："&cnbruce)
alert("删除前面空格："&ltrim(cnbruce))
alert("删除后面空格："&rtrim(cnbruce))
alert("删除前后空格："&trim(cnbruce))
</script>

[Ctrl+A 全部选择进行拷贝 提示：可先修改部分代码，再点击运行]

4，




Application.lock
Application("show")="来自"&Request.ServerVariables("remote_addr")& "的" &Session("nick")&"在"&time& "的时候说：" &talk& "<br>" &Application("show")
Application.UnLock

提取精华得




Application.lock
Application("show")=talk& "<br>" &Application("show")
Application.UnLock

可以看到是Application变量的叠加功能，每次Application("show")的值都建立在原有Application变量值的基础之上，再附加上最新的聊天内容：talk变量的值。这样就保证所有用户都能看到的共享信息了。

未完待叙

赞 (0)

相关推荐

  • AngularJS+Node.js实现在线聊天室

    AngularJS+Node.js实现在线聊天室

    不得不说,上手AngularJS比我想象得难多了,把官网提供的PhoneCat例子看完,又跑到慕课网把大漠穷秋的AngularJS实战系列看了一遍,对于基本的使用依然有很多说不清道不明的疑惑,于是决定通过做一个在线聊天室帮助理解.DEMO可以戳→chat room,代码可以戳→ChatRoom-AngularJS. 清晰图可以戳 http://files.jb51.net/file_images/article/201508/201508281040051.gif 功能 着手开发之前,首先明确一

  • chat.asp聊天程序的编写方法

    chat.asp聊天程序的编写方法

    可能朋友们已经在一些杂志上看到过 ASP 聊天程序的编写方法,但作者在这里自己写了一个更简单的程序,仅仅使用了一个 .asp 文件.请将以下代码剪贴到记事簿并保存为chat.asp. < %@ Language=VBScript %> < % Response.Buffer=true ' 设置输出缓存,用于显示不同页面. On error resume next ' 忽略程序出错部分 If Request.ServerVariables("Request_Method"

  • php实现简易聊天室应用代码

    php实现简易聊天室应用代码

    核心逻辑 在定义应用程序的核心功能之前,先来看一看聊天应用程序的基本外观,如以下截图所示: 通过聊天窗口底部的输入框输入聊天文本.点击Send按钮,就开始执行函数set_chat_msg.这是一个基于Ajax的函数,因此无需刷新页面就可以将聊天文本发送到服务器.程序在服务器中执行chat_send_ajax.php以及用户名和聊天文本. // // Set Chat Message // function set_chat_msg() { if(typeof XMLHttpRequest !=

  • ASP建立一个简单的聊天室

    经过一个阶段的asp学习,下面我们结合所学过的内容建立一个最简单的聊天室,虽然很简单,但是大家可以通过它来掌握一个聊天室建立的基本过程,并且可以不断的完善其功能. 下面介绍其主要步骤: 1,添加Global.asa文件里面的代码.这部分代码主要处理Application_onStart事件,在此事件中,定义了一个有15个元素的数据,并把它赋给了一个Application对象的属性.Global.asa文件的内容如下. <SCRIPT LANGUAGE="VBScript" RUN

  • ASP.NET 使用application与session对象写的简单聊天室程序

    ASP.NET 使用application与session对象写的简单聊天室程序

    ASP.Net中有两个重要的对象,一个是application对象,一个是session对象. Application:记录应用程序参数的对象,该对象用于共享应用程序级信息. Session:记录浏览器端的变量对象,用来存储跨网页程序程序的变量或者对象. 说实话,写了快一年的asp.net,application对象还真没怎么用过.看了看书,根据这两个对象的特性写了一个简单的聊天室程序.真的是非常的简陋. 我的思路是,有两个页面Default页和ChatRoom页,页面布局如图: Default

  • php socket实现的聊天室代码分享

    /** * patServer * PHP socket server base class * Events that can be handled: * * onStart * * onConnect * * onConnectionRefused * * onClose * * onShutdown * * onReceiveData * * @version 1.1 * @author Stephan Schmidt <schst@php-tools.de> * @package pa

  • 利用ASP规划聊天室

    经 常 在Internet 上 冲 浪 的 网 友 恐 怕 很 少 有 人 没 有 去 过 聊 天 室 胡乱神聊. 你 只 要 稍 微 留 意 一 下 就会 发 现 这 些 聊 天 室 大 多 是 用CGI 程 序 或 者 用JAVA 开 发 的 Applet 维 护 的. 开 发 过 这 类CGI 或Applet 的 程 序 员 都 知 道, 这 种 开 发 工 作 是 费 时 费 力 的. 那 么 有 没 有 一 种 更 简 单. 省 力 的 开 发 方 式 呢 ? 答 案 是 肯 定 的.

  • 用PHP+MySQL搭建聊天室功能实例代码

    下面,以一个简单的聊天室设计为例,介绍PHP+MySQL在网页开发中的应用 1.总体设计 1.1 构思与规划: 聊天室的基本原理,就是把每个连上同一网页的用户传送的发言数据储存起来,然后将所有的发言数据传给每一用户.也就是说,用数据库汇集每个人的发言,并将数据库中的数据传给每一个人就实现了聊天室的功能. 1.2 表设计 首先使用MySQL建立表chat用来储存用户的发言: 复制代码 代码如下: mysql> CREATE TABLE chat -> (chtime DATATIME, ->

  • php+html5基于websocket实现聊天室的方法

    本文实例讲述了php+html5基于websocket实现聊天室的方法.分享给大家供大家参考.具体如下: html5的websocket 实现了双向通信,折腾了几天弄了个聊天室,分享给大家 <?php error_reporting(E_ALL); ob_implicit_flush(); $sk=new Sock('127.0.0.1',8000); $sk->run(); class Sock{ public $sockets; public $users; public $master;

  • PHP实现简单聊天室(附源码)第1/2页

    一,聊天室模块实现1,聊天室主页面窗口设置 复制代码 代码如下: <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><!--载入配置文件--><?php include_once 'config.php';?><!--页面标题--><title><?php echo CHAT_NAME; ?></ti

  • nodejs实现的一个简单聊天室功能分享

    今天我来实现一个简单的聊天室,后台用nodejs, 客户端与服务端通信用socket.io,这是一个比较成熟的websocket框架. 初始工作 1.安装express, 用这个来托管socket.io,以及静态页面,命令npm install express --save,--save可以使包添加到package.json文件里. 2.安装socket.io,命令npm install socket.io --save. 编写服务端代码 首先我们通过express来托管网站,并附加到socke

  • ASP.NET网站聊天室的设计与实现(第3节)

    ASP.NET网站聊天室的设计与实现(第3节)

    大家都玩过网站聊天室吧,那知道它是怎么实现的吗? 今天我们就来设计一个网站聊天室,用户输入用户名登陆聊天室,采用框架结构实现. 学习内容: 第一步,聊天室首页与简单计数器设计 1.打开VS2008.在"解决方案'101'下新建网站,命名为Chatroom.默认首页文件为Default.aspx. 2.为Default.aspx添加窗体控件,切换到"设计"视图,从左侧工具箱标准组中拖出2个Lable控件,1个Textbox控件,一个Button控件,最后给输入昵称的Textbo

  • Python实现的使用telnet登陆聊天室实例

    Python实现的使用telnet登陆聊天室实例

    本文实例讲述了Python实现的使用telnet登陆聊天室.分享给大家供大家参考.具体如下: 前久在家学习Python的时候写的一个简单的聊天室,可以使用telnet来登陆. 遗憾的是现在对中文的支持很差,英文聊天倒是没什么问题了. 功能很简单的,应该没有你想象的那么强大,但是你如果有兴趣的话可以试试的. 另外,让我惊奇的是它可以在Android的平板上运行SL4A的Python解释器上运行(需要稍微改几句代码,貌似是编码的那个地方,我记不清了). 现在这个是可以在PC上跑起来的. 废话不多,直

  • Java基于socket实现简易聊天室实例

    Java基于socket实现简易聊天室实例

    本文实例讲述了Java基于socket实现简易聊天室的方法.分享给大家供大家参考.具体实现方法如下: chatroomdemo.java package com.socket.demo; import java.io.IOException; import java.net.DatagramSocket; public class ChatRoomDemo { /** * @param args * @throws IOException */ public static void main(S

随机推荐