一个简单聊天试的源代码!(三)

源代码

forum.asp

<%
On error resume next
%>
<%
KNAME=SESSION("KNAME")
RESPONSE.WRITE KNAME
If trim(Request.Form("content"))="" then
talk=kname&" 沉默是金。"
Else
talk=trim(Request.Form("content"))
End If
Application.lock
Application("show")="<table border='0' cellpadding='0' cellspacing='0' width='85%' ><tr><td width='100%' bgcolor='#C0C0C0'></td></tr><tr><td width='100%'><font color='#0000FF'> 来自 "&Request.ServerVariables("remote_addr")&" 的 "&Session("KNAME")&time&" 说:</font>"&talk&"</td></tr><tr><td width='100%' bgcolor='#C0C0C0'></td></tr></table><br>"&Application("show")
Application.UnLock

Response.Write Application("show")

%>

时间: 2025-01-02 21:09:35

一个简单聊天试的源代码!(三)的相关文章

一个简单聊天试的源代码!(四)

frft.asp<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN" ><html ><head ><meta http-equiv="Content-Type"content="text/html; charset=gb_2312-80" ><meta name="GENERATOR" content="Microsoft

有没有朋友帮我导入demo?做一个简单聊天app

问题描述 我的qq  1061385816   远程协助,有偿服务 解决方案 @beyond ,  简单demo啥时候出?解决方案二:关于简版demo 已经修改了两版了,在做最后的确认,这周争取上传.不过我看这位同学的问题不是简版demo解决的,是不知道怎么做没思路吗?可以再社区发帖把问题详细列出来,社区里面有很多热心的大牛,也可以到官网咨询环信技术支持,有一群热心的技术支持解决哈.吐过是想找人远程有偿帮助,我给你推荐一个哈江南孤鹜解决方案三:简单聊天app 官方demo可以实现,不过如果是需要

一个简单聊天室的建立.(供学习参考)

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

一个简单的聊天试的源代码!(二)

源代码 recieve.asp <html><% KNAME=REQUEST.FORM("USNAME")   KPASSWORD=REQUEST.FORM("USPASSWORD") DbPath = SERVER.MapPath("chat.mdb")Set conn = Server.CreateObject("ADODB.Connection")conn.open "driver={Micr

Emit学习-实战篇-实现一个简单的AOP框架(三)

今天来介绍配置文件的定义和加载,先给出配置文件的内容,然后在详细介绍里面各节的含义,以及如何用程序加载配置文件,内容如下: 配置文件 <?xml version="1.0" encoding="utf-8" ?> <AOP> <Regeisty> <IPreProcess> <Aspect id="AddPreProcessLog" value="YQL.TestProject:YQ

一个简单的记事本代码(三)

/****************************************************/ //行为事件 public void actionPerformed(ActionEvent e) { if (e.getSource() == jMenuFileCut) { FileCut(e); } else if (e.getSource() == jMenuFileCopy) { FileCopy(e); } else if (e.getSource() == jMenuFil

一个简单的自动发送邮件系统(三)

一个简单的自动发送邮件系统(三)     这里介绍php和mysql结合起来实用.如何从mysql数据库中提取数据.     好,我们已经成功的完成了我们的要求,很多的数据已经存在了数据库中,现在的问题是,如何查询这些数据,得到有用的结果呢? 在下面的程序中,我们将选择"apple"的用户输出. -------------------------------------------------------- <?    /* 声明一些必须的变量*/ $hostname = &qu

一个简单的自动发送邮件系统(三)_php基础

一个简单的自动发送邮件系统(三)     这里介绍php和mysql结合起来实用.如何从mysql数据库中提取数据.     好,我们已经成功的完成了我们的要求,很多的数据已经存在了数据库中,现在的问题是,如何查询这些数据,得到有用的结果呢? 在下面的程序中,我们将选择"apple"的用户输出. -------------------------------------------------------- <? /* 声明一些必须的变量*/ $hostname = "

android-Android List一个简单问题

问题描述 Android List一个简单问题 Android里面的Adapter 更新数据 oldList.clear(); oldList.addAll(newList); 与oldList = newList有什么区别吗? 2种方法 更新出来数据不一样 解决方案 当然有区别,一个是清除oldList,再添加newList的元素到oldList 另一个仅仅是改变了引用,新旧列表指向同一个对象.前者执行后oldList和newList都是newList的内容(有两份) 后者不会改变原来的old