- 浏览: 1449638 次
- 性别:
- 来自: 苏州
文章分类
- 全部博客 (564)
- 算法 (7)
- 流金岁月 (1)
- Javascript (30)
- actionscript (108)
- as3.0 game (14)
- flex (84)
- fms2 (27)
- 正则表达式 (7)
- 开源组件代码(as3.0) (1)
- Pv3d (13)
- Cairngorm (4)
- vbs (54)
- VB程序设计 (26)
- 计算机应用与维护 (4)
- 职场实用穿衣技巧 (3)
- 历史风云 (15)
- 淡泊明志,宁静致远 (12)
- 情感 (26)
- 杂谈 (41)
- 越南风 (14)
- DirectX (9)
- Dev-cpp (11)
- 回望百年 (2)
- 建站经验 (2)
- Python (24)
- 网络赚钱 (4)
- php (2)
- html (1)
- ob0短址网 (1)
- ob0.cn (1)
- wordpress (1)
- pandas logistic (1)
- haxe (1)
- opencv (1)
- 微信小程序 (3)
- vue (3)
- Flutter (1)
最新评论
-
GGGGeek:
第一个函数滚动监听不起作用,onPageScroll可以
微信小程序--搜索框滚动到顶部时悬浮 -
naomibyron:
解决办法:工具 -> 编译选项 -> 编译器 ...
dev-c++中编译含WINSOCK的代码出现错误的解决方法 -
haichuan11:
这个…… 代码不全真的是让人很憋屈的感觉啊
actionScript 3.0 图片裁剪及旋转 -
chenyw101:
老兄能留个QQ号吗?具体的我有些东西想请教下你
用VB制作网站登陆器 -
yantao1943:
貌似有点问题,只派发一次事件啊
使用ActionScript 2.0或ActionScript 3.0处理音频文件的提示点(cue
一、读者指引
读者指引帮助你掌握本文的梗概。以免你看了大半才明白这编文章不适合你,给你造成视觉污染。
如果你正在用ASP+XML写一些程序,或者你正在学XML那就值得一看。
阅读本文须具备的知识,对ASP有基本的了解,对XML和DOM有基本了解,如果你不了解那么你通过学习本文基本上能够撑握ASP+XML和DOM的应用,并能根据本文范写出自已更高级的ASP+XML程序。
二、基本思想
本文思想是基于用ASP和DOM来读取和存储XML数据,并利用XML数据来存储留言信息,达到同用数据库存储数据的功能。
三、XML留言本的优势
或许你会问用ASP+TXT文本也可以达到不用数据库实上留言的功能,不错确实能够做到,而且网上也有很多这样的留言本免费下载,但这里我要讲一下ASP+XML的优越性。
1、XML+ASP比ASP+TXT速度要快。可能你也发现当TXT文件很少时速度出奇的快,但是随着留言信息的增加TXT文本变大,速度却又是出奇的慢这就是ASP+TXT的弱点。当然我不能说ASP+XML就一定是出奇的快,但是比起ASP+TXT来说是快了许多,当然随着留言信息的增加XML文本增大速度也下降很快,但是比起TXT来说就还是好了许多(这一点可以从WAS测试证明读者可以自行测试),当然ASP+XML比不上数据库,因为数据库对查询做了特别的优化,而XML只是纯文本,在ASP建立对像是要把XML数据全部读入内存中,如果数据量大的话可想而知速度会慢下来。那你也许会问那我什么时候用关系数据库存储数据,又什么时候用XML存储数据呢?我这里也顺便提一下,就是当数据比较复杂无规率时用XML数据比较合适,还有就是你打算这些数据要在不同的操作系统上读取运用时那就是XML大显身手的时候了。如果你是普通的数据那么不到关键时刻或不支持数据库的空间时还是不要用XML文件来存储数据为好。
2、XML数据的易读取性,TXT文本是比较难操作的,我们必须一行一行的读取判断,而且很多功能无法实上,只能编制比较简单的留言本,而XML数据则不同了,利用DOM可以轻易的访问每一个节点,而不是TXT那些烦人的Readline() Witeline()了,我们可以随意的加入删除更新某一个我们感兴趣的节点,利用ASP或者JS或者数据岛都可以轻松实上这一点,当然我这里为发考虑兼容性,用了ASP来读取XML数据,而没有用数据岛来读取节点数据(因为只有IE5以上版本才支持数据岛技术)而用ASP来实上就不存在这些问了因为客户得到的是HTML文件。
3、XML数据夸操作系统性,只要我们把这些数据存储为XML那么这些数据就能被应何基它语言或系统所识别,而不用做应何改动。TXT显然不具备这些性能。例如我们在网上的留言信息可以直接被被转换成wap格式在手机上显示。
四、建立存储留言信息的XML文件(List.xml)
我们这里不打算使用DTD,因为我们这是我们自已编制并测试通过的XML数据,所以不需要DTD来验证(如果你对此感兴趣当然可以加一个这不影响程序的运行)。现在我们来看看建立一个留言本的基本要素
0、留言ID号--定义为<id>
1、用户名我们--定义为<username>
2、来自那里们--定义为<fromwhere>
3、留言时间定--义为<Posttime>
4、用户主页定--义为<homepage>
5、用户的信箱--定义为<email>
6、留言内容定--义为<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)
'如果超过则结束节点要减去(StarNodes-AllNodesNum)的差值否则下标会超界出错
StarNodes=AllNodesNum
end if
if EndNodes<0 then
EndNodes=0
end if
while StarNodes>=EndNodes
'从结束节点到超始节点之间读取节点数据
username = objRootsite.childNodes.item(StarNodes).childNodes.item(1).text
'获得用户名
fromwhere = objRootsite.childNodes.item(StarNodes).childNodes.item(2).text
'获得用户来自那里
Posttime = objRootsite.childNodes.item(StarNodes).childNodes.item(3).text
'获得留言时间
homepage = objRootsite.childNodes.item(StarNodes).childNodes.item(4).text
'获得用户主页
email = objRootsite.childNodes.item(StarNodes).childNodes.item(5).text
'获得用户Eamil
text = objRootsite.childNodes.item(StarNodes).childNodes.item(6).text
'获昨留言内容
'*****************************************************************************
'这里使作了XML的DOM来读取数据,显然objRootsite对像所对应的节点为<NewList>
' objRootsite.childNodes.item(StarNodes)所对应的节点就是<list>节点因为不至一个<list>节点所以用了item()来识别当前节点数据,随着StarNodes的递减<list>节点根着往上移一个个读取<list>节点数据。
'objRootsite.childNodes.item(StarNodes).childNodes.item(1).text所对应的节点为具体的每个节点的文本值,这里(1)所对应的就是username用户名(因为<list>节点的子节点才是我们真正所要的)
'******************************************************************************
text = replace(text,chr(13),"<br>")
'替代回车
text = replace(text,chr(32)," ")
'替代空格
%>
<tr bgcolor="#F0F0F0">
<td width="21%" height="94" valign="top">姓 名:<%=username%><br>
来 自:<%=fromwhere%><br>
</td>
<td width="79%" height="94" valign="top"> | <a href="<%=homepage%>" target=_blank title="<%=username%>的主页">主页</a>
| | <a href="mailto:<%=email%>" title="给<%=username%>写信">信箱</a> | |<font color="#CC6633">
留言时间:<%=Posttime%> </font>|
<hr>
<%=text%> </td>
</tr>
<tr bgcolor="#FFFFFF" align="right">
<td colspan="2"> </td>
</tr>
<%
StarNodes=StarNodes-1
wend
set objXML=nothing
%>
<tr bgcolor="#FFFFFF" align="right">
<td colspan="2"> 共有<<%=PageNum%>>页
<%
if cint(PageNo)<>PageNum then'分页
response.write "<a href='index.asp?PageNo="&(PageNo+1)&"'>上一页</a>"
end if
if cint(PageNo)<>1 then
response.write "<a href='index.asp?PageNo="&(PageNo-1)&"'>下一页</a> "
end if
%>
</td>
</tr>
</table>
</body>
</html>
五、建立显示XML数据的ASP文件(index.asp)
这个文件要实现的功能就是读取并显示XML数据,首先创建一个XML对像然后把XML读入内存中,利用DOM分离出我们所要的数据。
六、建立写新留言程序(PostNew.asp)
这个文件要实现的功能就是写入新的XML节点,首先创建一个XML对像然后把XML读入内存中,利用appendChild()方法加入我们生成的XML节点。
username=request.form("username")
if username<>"" then
fromwhere =request.form("fromwhere")
homepage =request.form("homepage")
email =request.form("email")
text =request.form("text")
text =replace(text,"<","<")
Posttime =now()
strSourceFile = Server.MapPath("/") & "\List.xml"
'获取XML文件的路径这里根据你的虚拟目录不同而不同
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
'创建XML对像
objXML.load(strSourceFile)
'把XML文件读入内存中
Set objRootlist = objXML.documentElement.selectSingleNode("NewList")
'选取<NewList>节点
if objRootlist.hasChildNodes then
'判断<NewList>是否有子节点(因为如果是每一次<NewList>是没有子节点的,
’ 如果不加判断在第一次运得时就会报错
id = objRootlist.lastchild.firstchild.text+1
'这里获得将要插入子节点的ID号,其ID号为<NewList>的最后一个子节点(lastchild)的第一个子节点(firstchild)的ID号加1(这里我们按照关系型数据库的ID号来递增)
else
'如是没有字子节点则是第一次留言ID号设为1
id=1
end if
brstr=chr(13)&chr(10)&chr(9)
'为了插入XML文件中的节点换行空格排列整齐
’(当然你也可以不用这样只是为了XML数据好看而以)
XMLnode=brstr&"<list>"&brstr & _
"<id>"&id&"</id>"&brstr & _
"<username>"&username&"</username>"&brstr & _
"<fromwhere>"&fromwhere&"</fromwhere>"&brstr & _
"<Posttime>"&Posttime&"</Posttime>"&brstr & _
"<homepage>"&homepage&"</homepage>"&brstr & _
"<email>"&email&"</email>"&brstr & _
"<text>"&text&"</text>"&brstr & _
"</list>"&chr(13)
'根据得到的数据建立XML片段
set objXML2=Server.CreateObject("Microsoft.XMLDOM")
'建立一个新XML对像
objXML2.loadXML(XMLnode)
'把XML版片段读入内存中
set rootNewNode=objXML2.documentElement
'获得objXML2的根节点
objRootlist.appendChild(rootNewNode)
'把XML片段插入到List.xml中
objXML.save(strSourceFile)
'存储lsit.xml文件(因为不存储List.xml只在内存中更新了)
set objXML=nothing
set objXML2=nothing
response.write "谢谢您的留言"
response.end
end if
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
td { font-size: 9pt}
-->
</style>
</head>
<body bgcolor="#0099CC" text="#000000">
<table width="80%" border="0" cellspacing="1" cellpadding="4" align="center" bgcolor="#FFFFFF">
<form action="PostNew.asp" method="post" name="form1">
<tr bgcolor="#000000">
<td colspan="2"><font color="#FFFFFF">新留言</font></td>
</tr>
<tr bgcolor="#EFEFEF">
<td width="19%" align="right">姓 名:</td>
<td width="81%">
<input type="text" name="username">
** </td>
</tr>
<tr bgcolor="#EFEFEF">
<td width="19%" align="right">来 自:</td>
<td width="81%">
<input type="text" name="fromwhere" value="中国">
</td>
</tr>
<tr bgcolor="#EFEFEF">
<td width="19%" align="right">主 页:</td>
<td width="81%">
<input type="text" name="homepage" value="http://">
</td>
</tr>
<tr bgcolor="#EFEFEF">
<td width="19%" align="right">Email:</td>
<td width="81%">
<input type="text" name="email">
</td>
</tr>
<tr bgcolor="#EFEFEF">
<td width="19%" align="right" valign="top">内 容:</td>
<td width="81%">
<textarea name="text" cols="60" rows="10"></textarea>
</td>
</tr>
<tr bgcolor="#EFEFEF">
<td width="19%" align="right"> </td>
<td width="81%">
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重填">
</td>
</tr>
</form>
</table>
</body>
</html>
发表评论
-
使用bat 处理文件 批量下载图片,下载文件
2018-11-17 10:42 3885Download Wscript.Arguments(0) ... -
VB6逆向工程浅析
2011-12-29 07:36 1724前言 VB的编译有两种方式,一种是P-Code ... -
VB函数——逆向分析备查
2011-12-28 21:39 1471Variant 变量的内部表示:_____________ ... -
VB程序逆向常用的函数
2011-12-28 21:38 14781) 数据类型转换: ... -
用XML创建可排序、分页的数据显示页面
2008-08-30 08:10 1385在Web开发中,我们经常 ... -
SQL注入天书 - ASP注入漏洞全接触
2008-08-28 17:39 1073随着B/S模式应用开发的发展,使用这种模式编写应用程序的程序员 ... -
一个学校的网站安全性测试
2008-08-28 17:38 1142本文作者:angel文章性质:原创发布日期:2004-04-0 ... -
改mdb为asp所带来的灾难
2008-08-28 17:36 992本文作者:SuperHei·Lilo文章性质:原创发布日期: ... -
XML实例解析
2008-08-28 17:35 1093提纲: 一:实例效果 ... -
选单连动
2008-08-28 17:34 1060动机: 现在我们做个在IE里应用XML的一个小例子:解决双下 ... -
ASP常用的代码(不断更新)
2008-08-28 17:34 12351.获得系统时间:<%=now()%>2.取得来访 ... -
动态排序
2008-08-28 17:31 1125动机: 排序功能让我们页面上的数据显的更人性化,是我们在网站 ... -
动态查询
2008-08-28 17:31 869动机: 查询功能是我们 ... -
XML卷之动态分页
2008-08-28 17:30 1192动机: 为了方便用户查看大批量数据,我们会用到动态分页,因此 ... -
对xml+xsl实现分页排序的改进,使支持对所有数据进行排序
2008-08-28 17:29 2085以往见过的利用xml+xsl来实现分页排序的基本都只能本页内排 ... -
使用XML、XSLT和XPath创建可排序、分页、重用的数据显示页
2008-08-28 17:27 1323在Web开发中,我们经常 ... -
asp查询xml的代码,实现了无刷新、模糊查询功能
2008-08-28 17:13 1152<html> <head> ... -
用Asp+XmlHttp实现RssReader功能
2008-08-28 17:12 866<style>body {margin:10px; ... -
vb+Webbrowser控件详解
2008-08-25 20:48 6816vb+Webbrowser控件详解 1、获得浏览器信息: P ... -
BBS注册机(vb script, telnet, sterm)
2008-08-16 11:34 1524#include "lib.vbs" Co ...
相关推荐
在“一个以ASP.NET+XML编写的留言本”项目中,我们可以看到ASP.NET技术与XML数据存储方式的结合应用。 ASP.NET 提供了多种开发模式,如Web Forms、MVC(Model-View-Controller)和Web Pages,这些模式都支持动态...
在本例中,"ASP+XML 精美留言本"是一个基于ASP技术构建的,利用XML(Extensible Markup Language)存储和处理数据的在线留言系统。 XML是一种轻量级的数据交换格式,它的主要特点是结构化和自我描述性。在ASP应用中...
本文将深入探讨如何使用ASP.NET和XML来编写一个留言板系统,这对于初学者来说是一个很好的实践项目。 ASP.NET是微软推出的一种服务器端编程框架,它基于.NET Framework,用于构建高效、安全且易于维护的Web应用。...
这个"ASP源码—一个简单ASP+XML留言本.zip"文件包含了一个基于ASP技术构建的简单留言本应用,它利用XML作为数据存储格式。下面我们将详细探讨ASP和XML在构建此类应用中的关键知识点。 1. ASP基础: - ASP是微软的...
在这个留言本中,ASP可能负责后台逻辑,如接收用户提交的留言、保存到数据库、以及检索数据库中的留言供XML文件使用。通过ASP,开发者可以编写服务器端的程序,处理HTTP请求,执行计算,验证用户输入,以及与数据库...
这个实例开发源码提供了一个简单的ASP与XML结合的留言本应用,它可以帮助我们了解如何在ASP中处理用户交互并利用XML存储和展示数据。 在ASP中,我们可以使用VBScript或JScript等脚本语言编写代码,这些代码会在...
该项目主要介绍了一个基于ASP和XML技术实现的留言本系统。通过这个系统,用户可以在网页上留下自己的评论或信息,这些信息将被保存到XML文件中。系统还支持对留言进行查询、编辑等功能。 #### 技术栈与架构设计 ##...
【晴网留言本(ASP+XML)】是一个基于ASP(Active Server Pages)和XML(Extensible Markup Language)技术开发的在线交互系统,主要用于网站的访客留言、查看、回复和删除功能。该系统的设计旨在增强网站与用户之间的...
【标题】"Flash + XML + ASP.NET 留言板"是一个典型的Web应用程序开发实例,它结合了多种技术来创建一个交互式的用户交流平台。在这个系统中,Flash负责前端的用户界面(UI)设计,提供丰富的图形和动态效果,使用户...
每段程序给你说明,非常适合学习”表明这是一个教学资源,旨在帮助学习者理解如何使用Flash、XML、ASP(Active Server Pages)和Access数据库来创建一个互动的留言版系统。这个系统可能涵盖了前端交互设计到后端数据...
将XML与ASP结合使用,可以构建出功能强大的、灵活的数据驱动应用程序,例如这个“xml结合asp制作的个性留言本”。 在XML中,数据被组织成结构化的格式,通过自定义的标签来定义元素。例如,在留言本应用中,每条...
综合以上分析,这个项目提供了一个使用Flash、XML和ASP技术创建的多语言网站模板,包括动态新闻展示、视频播放和用户互动(如留言本)等功能。通过学习这些源码,开发者可以了解如何在网页上集成动态Flash内容,并...
"基于ASP的XML留言本 v1.2.zip"是一个使用ASP技术开发的网站应用,主要用于实现用户留言功能,并且将数据存储为XML格式。 【XML基础】 XML(eXtensible Markup Language)是一种标记语言,用于存储和传输结构化...
在本案例"基于ASP的读写XML文件留言本.zip"中,我们可以学习到如何使用ASP来处理XML文件,实现一个简单的在线留言本功能。XML(Extensible Markup Language)是一种数据交换格式,它允许开发者以结构化的方式存储和...
ASP源码—XML ASP 留言本 v1.0 Build 20220706.zip 是一个基于Active Server Pages(ASP)技术开发的简单留言本应用。这个版本号表示该软件在2022年7月6日进行了构建,可能是其发布或更新的日期。ASP是一种微软公司...
总结来说,ASP—XML留言本 v1.0是一个利用ASP技术结合XML数据存储的简单Web应用,它展示了如何在服务器端使用脚本语言处理用户数据,以及如何通过XML进行结构化数据的存储和读取。了解和掌握这些知识点对于Web开发,...
在"基于ASP的xml 留言本 v1.0.zip"这个项目中,ASP被用来开发了一个基于XML的留言本系统。XML(eXtensible Markup Language)是一种用于存储和传输结构化数据的标准格式,它的特点是可扩展性强,数据结构清晰,易于...
通过这个基于ASP的XML留言本,开发者可以学习如何利用ASP动态生成页面,如何与XML文件交互以保存和读取数据,以及如何使用JavaScript提供前端交互体验。对于初学者,这是一个很好的实践项目,可以帮助他们深入理解...
通过上述方式,基于XML技术的留言本能够实现数据的持久化存储,通过ASP.NET和C#处理数据的读取、写入和展示,提供一个交互式的用户界面,让用户能够方便地查看和发布留言。这样的设计既体现了XML的灵活性,也利用了...
总之,ASP源码—XML留言本 v1.2是一个基于ASP和XML技术的简单Web应用,它展示了如何使用服务器端脚本处理用户交互并存储数据。虽然现在的Web开发更多地转向了像PHP、JavaScript(前后端分离)和数据库驱动的方法,但...