用ASPXML打造留言本

一、读者指引
  
读者指引帮助你把握本文的梗概。以免你看了大半才明白这编文章不合适你，给你造成视觉污染。
  
假如你正在用ASP XML写一些程序，或者你正在学XML那就值得一看。
  
浏览本文须具备的知识，对ASP有基础的懂得，对XML和DOM有基础懂得，假如你不懂得那么你通过学习本文基础上能够撑握ASP＋XML和DOM的利用，并能根据本文范写出自已更高级的ASP＋XML程序。
  
二、基础思想
  
本文思想是基于用ASP和DOM来读取和存储XML数据，并利用XML数据来存储留言信息，达到同用数据库存储数据的功效。
  
三、XML留言本的上风
  
或许你会问用ASP＋TXT文本也可以达到不用数据库实上留言的功效，不错确实能够做到，而且网上也有很多这样的留言本免费下载，但这里我要讲一下ASP＋XML的优胜性。
  
１、XML＋ASP比ASP＋TXT速度要快。可能你也发明当TXT文件很少时速度出奇的快，但是随着留言信息的增加TXT文本变大，速度却又是出奇的慢这就是ＡＳＰ＋TXT的弱点。当然我不能说ＡＳＰ＋XML就必定是出奇的快，但是比起ＡＳＰ＋TXT来说是快了很多，当然随着留言信息的增加ＸＭＬ文本增大速度也降落很快，但是比起TXT来说就还是好了很多（这一点可以从ＷＡＳ测试证实读者可以自行测试），当然ＡＳＰ＋XML比不上数据库，由于数据库对查询做了特别的优化，而XML只是纯文本，在ＡＳＰ建立对像是要把ＸＭＬ数据全部读进内存中，假如数据量大的话可想而知速度会慢下来。那你也许会问那我什么时候用关系数据库存储数据，又什么时候用XML存储数据呢？我这里也顺便提一下，就是当数据比拟复杂无规率时用XML数据比拟合适，还有就是你打算这些数据要在不同的把持系统上读取应用时那就是XML大显身手的时候了。假如你是普通的数据那么不到要害时刻或不支撑数据库的空间时还是不要用XML文件来存储数据为好。

２、XML数据的易读取性，TXT文本是比拟难把持的，我们必需一行一行的读取判定，而且很多功效无法实上，只能编制比拟简略的留言本，而ＸＭＬ数据则不同了，利用DOM可以轻易的拜访每一个节点，而不是TXT那些烦人的Readline() Witeline()了，我们可以随便的参加删除更新某一个我们感爱好的节点，利用ASP或者ＪＳ或者数据岛都可以轻松实上这一点，当然我这里为发考虑兼容性，用了ASP来读取XML数据，而没有用数据岛来读取节点数据（由于只有ＩＥ５以上版本才支撑数据岛技巧）而用ASP来实上就不存在这些问了由于客户得到的是HTML文件。
  
３、XML数据夸把持系统性，只要我们把这些数据存储为XML那么这些数据就能被应何基它语言或系统所辨认，而不用做应何修正。TXT显然不具备这些性能。例如我们在网上的留言信息可以直接被被转换成wap格局在手机上显示。
  
四、建立存储留言信息的XML文件(List.xml)

我们这里不打算应用ＤＴＤ，由于我们这是我们自已编制并测试通过的XML数据，所以不需要ＤＴＤ来验证（假如你对此感爱好当然可以加一个这不影响程序的运行）。现在我们来看看建立一个留言本的基础要素
  
０、留言ＩＤ号--定义为＜id＞
  
１、用户名我们--定义为＜username＞
  
２、来自那里们--定义为＜fromwhere＞
  
３、留言时间定--义为＜Posttime＞
  
４、用户主页定--义为＜homepage＞
  
５、用户的信箱--定义为＜email＞
  
６、留言内容定--义为＜text＞
  
当然以上不是必需的读者可以自行命名并加减相干标签，把它们组合起来就得到List.xml的文件了
  
＜?xml version="1.0" encoding="gb2312"?＞
  ＜site＞
  　　　＜NewList＞
  　　　　　　＜list＞
  　　　　　　　　＜id＞1＜/id＞
  　　　　　　　　＜username＞苛子＜/username＞
  　　　　　　　　＜fromwhere＞中国广州＜/fromwhere＞
  　　　　　　　　＜Posttime＞01-4-23 18:26:56＜/Posttime＞
  　　　　　　　　＜homepage＞http://page2000.xiloo.com＜/homepage＞
  　　　　　　　　＜email＞lucaihui@cmmail.com＜/email＞
  　　　　　　　　＜text＞这是我的第一个XML文件＜/text＞
  　　　　　　＜/list＞
  　　　＜/NewList＞
 ＜/site＞

五、建立显示XML数据的ASP文件(index.asp)
  
这个文件要实现的功效就是读取并显示XML数据，首先创立一个XML对像然后把XML读进内存中，利用DOM分别出我们所要的数据。

以下为引用的内容：
＜%
  strSourceFile = Server.MapPath("/") & "\List.xml"
  '获取XML文件的路径这里根据你的虚拟目录不同而不同
  Set objXML = Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
  '以自由线程创立一个XML对像
  objXML.load(strSourceFile)'把XML文件读进内存
  Set objRootsite = objXML.documentElement.selectSingleNode("NewList")
  '选取NewList节点
  %＞
  ＜html＞
  ＜head＞
  ＜title＞留言本＜/title＞
  ＜meta http-equiv="Content-Type" cOntent="text/html; charset=gb2312"＞
  ＜style type="text/css"＞
  ＜!--
  td { font-family: "宋体"; font-size: 9pt; text-decoration: none}
  a { font-family: "宋体"; font-size: 9pt; color: #0066CC; text-decoration: none}
  a:hover { color: #FF6600; text-decoration: underline}
  --＞
  ＜/style＞
  ＜/head＞＜body bgcolor="#0099CC" text="#000000"＞
  ＜table width="80%" border="0" cellspacing="1" cellpadding="4" align="center" bgcolor="#CCCCCC"＞
  ＜tr bgcolor="#000000"＞
  ＜td colspan="2"＞＜font color="#FFFFFF"＞留言溥 ＜a href="PostNew.asp"＞＜font color=#FFFFFF＞写新留言＜/font＞＜/a＞＜/font＞＜/td＞
  ＜/tr＞
  ＜%
  PageSize =10'假设每页显示10条留言
  AllNodesNum =objRootsite.childNodes.length-1
  '获取子节点数据（由于是从节点数从0开端的所最大子节点数要减1）
  PageNum=AllNodesNum\PageSize 1'算出总页数
  PageNo=request.querystring("PageNo")
  if PageNo="" then'假如是每一次获得页面则定位到每一页显示最新的留言
  PageNo=PageNum
  end if
  StarNodes=PageNo*PageSize-1'获得起始节点
  EndNodes=(PageNo-1)*PageSize'获得结束节点
  if EndNodes＜0 then
  EndNodes=0
  end if
  if StarNodes＞AllNodesNum then'判定起始节点数是否超过总的节点数
  EndNodes=EndNodes-(StarNodes-AllNodesNum)