如何用变量实现群聊和悄悄话？
发布时间：2010-05-19 21:33:00
具体代码见下。在此程序中，由于使用了变量，我们需将全部聊友的昵称用“，”（逗号）来隔开，储存到application（"visitorname"）里，并用一个循环来读取每个聊友的昵称。
<％
if Request.Form("xt")="on" then
' 判断是否悄悄话
Application.Lock
' 是悄悄话,继续往下处理
application(session("username"))=temppos&application(session("username"))
' 只有发言人和发言对象才能看到此发言,实现悄悄话
application(Request.form("d1"))=temppos&application(Request.form("d1"))
Application.UnLock
Else
' 群聊,继续往下处理
application("private")=temppos
p1=trim(application("visitorname"))
' 取众人昵称
dim aa
for k=1 to len(p1)
' 用application("visitorname")来存储全部聊友昵称,每个昵称之间用"，"隔开,并用此循环用来读取每个聊友的昵称
p2=mid(p1,k,1)
if p2="," then
aa=p3
Application.Lock
application(aa)=application("private")&application(aa)
' 聊天室的人都会看到此发言
Application.UnLock
p3=""
else
p3=p3&p2
end if％>
<％next％>
<％
end if
％>
0
投稿猜你喜欢
- 在Soundbreak我们每天24小时不间断地播放实况音频和视频，所以对于MySQL的新增的复制特性，我们不能做出很令人信服的测试。通过测试
- 在mysql网站时拿到的rpm包只能用root安装，不支持relocate用源码安装后./configure --prefix=/home/
- 代码如下:<％ function GetBot() '查询蜘蛛 dim s_
很有创意的鼠标指针风筝，看起来非常有意思。在网络上看到的，一下也想不起来是那里的了，所以特别说一下图片是来自网络的，版权归作者所有。- 将图片读入到Dom中，并将其存为xml文件1、需要命名空间using System.Text;using System.IO;using S
- 缓存是基于Application实现的CacheState类，建议实例化时用名Cache程序代码<％ Class Cache
- 关于段落<p></p>相信大家已经都在自己的工作中开始关注并应用了。因为那真的是非常简单的事，只要你愿意你随时都可以
- 6、遮罩滤镜作用：该滤镜可以为对象建立一个覆盖于表面的膜，其效果就象戴着有色眼镜看物体一样。语法： {filter:mask(color=c
- 链接的 target 属性怎么用 JS 来控制？ 在HTML 4.0 Strict和XHTML 1.0 STRICT里不允许在<a&g
- 希腊Web 设计师Christos Chiotis 发表在 CssGlobe 的一篇文章，讲述了黄金分割率在 CSS 中的应用。黄金分割率是
- 你有没有觉得你的CSS样式表文件过于臃肿？其实如果你注意并培养一些比较好的CSS书写习惯，我想你的CSS样式表过于”肥胖”的问题会得到很好的
- <script language="javascript"> functio
- 从MySQL 5.0 开始，支持了一个全新的SQL句法：PREPARE stmt_name FROM preparable_stmt;EXE
- 国外有很多优秀的文章可以用来学习，我决定花些时间翻译。我并不知道这篇文章有没有人翻译过，原文名 10 Awful IE Bugs and F
- Wordpress 2.6.2 出来了，今天将网站程序从2.6升级上来，比较了一下2个版本的代码，发现2.6的版本中的代码还有几个地方出现了
- asp之家注：如果你学习过asp，并且在网络公司上过班，一定会接触到网购系统，网购系统可以说是一个典型的程序类型，而其中最重要，也是最关键的
- Array.prototype._ = function(){var _p = 0;var _v = 0;(function(){
- 一. 10句话1.不要依赖register_global=ON的环境，从你刚懂得配置php运行环境甚至尚不明白register_global
- 设计是一个输入-输出的过程，因为首先有用户的需求，客户的项目才有设计的产生，设计是带有目的性和市场行为的，当然也有一部分的创造性设计，仅仅为
- 一、数据库远程管理技术 对于中小型应用，比如一个网站的建设和维护，这种大型应用平台就显得有些尾大不掉，开销也过于庞大。曾经在互联网技术和Ja
