XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（三）

javascript|xml|聊天室|刷新|无刷新

　　################reload.asp##############

<%'Response.ContentType="text/xml"
Response.Write "<?xml version=""1.0"" encoding=""GB2312""?>"

Response.Write "<Msg>"
dim c_info,c_Lid,c_Ip,u_Lid,NewLid,u_name,i
c_info=Application("c_info")
u_Lid=session("u_Lid")
newLid=u_Lid
u_name="netnice"
for i=c_info(0)+6 to 240 step 6
if (c_info(i)>u_Lid) and ((c_info(i+1)=u_name) or (c_info(i+2)=u_name) or (c_info(i+2)="大家") or (c_info(i+3)="0")) then
Response.Write c_info(i+5)
if (newLid<c_info(i)) then newLid=c_info(i)
end if
next
for i=1 to c_info(0) step 6
if (c_info(i)>u_Lid) and ((c_info(i+1)=u_name) or (c_info(i+2)=u_name) or (c_info(i+2)="大家") or (c_info(i+3)="0")) then
Response.Write c_info(i+5)
if (newLid<c_info(i)) then newLid=c_info(i)
end if
next
Response.Write "</Msg>"
session("u_Lid")=newLid
%>

时间： 2024-04-19 23:46:40

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（三）的相关文章

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（一）

javascript|xml|聊天室|刷新|无刷新 使用XML.而无须不断刷新*.ASP.无刷新实现发言的逐条显示.使用Application变量存储聊天记录,所以要需要建立一个虚拟目录服务器端不需要支持XML,只要支持ASP和能建立虚拟目录就可以了. 以下代码在nt4.0+iis4.0上通过.我估计在你的win2000下也差不多吧.如果有问题,请多多赐教:netnice@chinaok.net ##########index.asp##############################

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（五）

javascript|xml|聊天室|刷新|无刷新 这是最重要的一个了.也很大.我的习惯不太好.没有加详细的注释,认真看吧.#########send.asp##############<html> <head><META content="text/html; charset=gb2312" http-equiv=Content-Type> <meta http-equiv='pragma' content='no-cache'><

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（四）

javascript|xml|聊天室|刷新|无刷新 ########say.asp############## <% Option Explicit dim F,T,sC,cL,E,W,sJResponse.ContentType="text/xml"F=Request.Form ("F")T=Request.Form ("T") sC=Request.Form ("sC")cL=Request.Form ("

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（二）

javascript|xml|聊天室|刷新|无刷新 ################main.asp###################### <%Response.Buffer=trueResponse.Expires=0userName=Request.Form("username")if username="" then Response.Redirect "index.asp" session("u_name"

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现（六）

#############续send.asp################# var oRDom=new ActiveXObject("Microsoft.XMLDOM");oRDom.async=false;var Path="reload.asp";var tCok;function Clock(){cRld++;if (cRld>10){cRld=1;GetXmlData();}clearTimeout(tCok);tCok=setTimeout(&q

XMLHTTP+Javascript+Asp写得聊天室，无刷新实现。原创代码放送！服务器支持Asp即

########say.asp##############<% Option Explicit dim F,T,sC,cL,E,W,sJResponse.ContentType="text/xml"F=Request.Form ("F")T=Request.Form ("T")sC=Request.Form ("sC")cL=Request.Form ("cL")E=Request.Form(&quo

XMLHTTP+&amp;#106avascript+Asp写得聊天室，无刷新实现。原创代码放送！服务器支持Asp即可使用(二)

xml|服务器|聊天室|刷新|无刷新|原创 ################main.asp###################### <%Response.Buffer=trueResponse.Expires=0userName=Request.Form("username")if username="" then Response.Redirect "index.asp"session("u_name")=use

nodejs写的聊天室chome一直在报错求解

问题描述 nodejs写的聊天室chome一直在报错求解 写了一个聊天室,但是chrome控制台一直在报错,这是我的项目目录:html部分代码 <!DOCTYPE html><html> <head> <meta charset=""utf-8"" /> <title></title> <link rel=""stylesheet"" href=&q

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

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