<<<返回

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 version="1.0" encoding="GB2312"?>
<农村娃娃-出品-必属精品>
</农村娃娃-出品-必属精品>
---------------------------------------------
呵.生成该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
--------------------好了,完成了基本的步骤.等等再看登陆页面-----------------------