XML+JAVASCRIPT+ASP在线短信息功能(1)

使用XML.而无须不断刷新*.ASP.也不用隔一段时间就刷新XML数据.而是在用户把全部新

信息看完之后才刷新XML数据,如果一直没有新信息到达,就每3000号秒刷新一次XML数据.

有新信息到达的话,刷新就会停止.除非全部新信息已经被用户看完.

大大减少服务器负担.

无刷新实现在线信息的更新.一切都在用户不知道的情况下刷新.

有新信息到达就用声音/动画提示.

(我后面使用的是OICQ的声音文件,当然你也可以自定义)

带来的问题.因为着重考虑减少服务器的负担.没有使用SESSION,而使用COOKIES

代替(因此没有时间限制),因为刷新和数据显示都用JavaScript,所以某些不怀

好意的用户能分析代码并且能自己重新构造一个类市的页面,看到/冒名/删除你

的信息.

------------下面只列举一些文件.直接使用的话可能回产生错误-------------

------------因为代码直接在俺那COPY下来,所以如果要使用的话,

请恰当修改一下.后面的所有代码在IIS5+IE5上运行没问题,必须要安装IE5或则以上版本.

因为冲忙贴上的缘故,或许会有些错误.不过应该是没有的了.呵呵!

好了,废话少说,首先来看看我们需要准备的文件:

用户注册页面:.这里要说说注册问题.先看看存放用户注册信息的表:

表的部分字段内容 ID(自动编号) 名字 密码

需要注意的是.在用户注册以后,要在你的服务器硬盘上生成一个属于该用户自己

的,用来存储该用户以后在线信息的XML文件.来,我们看看这个XML文件的内容.

很简单的一个XML

(作为一个模板使用.生成每个用户的XML文件都直接COPY这个XML,

假设名为ROOT1.XML,放在BATCH目录下):

--------------------------------------------

<农村娃娃-出品-必属精品>

---------------------------------------------

呵.生成该XML文件的ASP代码(记得要在用户注册时生成,用表里的用户ID来做该用户的XML文件的文件名)

Function CreateXmlFile( ID ) '参数ID就是代表用户的XML文件名,就是用户信息表里面的自动编号字段数据

Dim Dom

Set Dom = Server.CreateObject("Microsoft.XMLDOM")

Dom.Async = False

Dom.Load(Server.MapPath("Batch/ROOT1.xml"))

If Dom.parseError.errorCode <> 0 then

CreateXmlFile = True ' 发生错误,生成失败,函数返回TRUE

Else

Dom.Save(Server.MapPath("User/Xml) & "\" & ID & ".xml")

'上面的参数就是生成该用户的XML文件到服务器硬盘上的文件夹里

'(当然你也可以自定义路径,不过每个用户的XML的文件都要放在同一个文件夹)

If Err.number <> 0 then

Err.Clear

CreateXmlFile = True ' 发生错误,生成失败,函数返回TRUE

End If

End Function

--------------------好了,完成了基本的步骤.等等再看登陆页面-----------------------

上一篇： ASP如何使用MYSQL数据库

下一篇： 用正则表达式突出显示字符串中查询到的单词的函数