基于Delphi5核心技术的分布式Web网站实现技术

维普资讯

２００９＿年９月　

湖南师范大学自然科学学报　

Ｊｏｔａ－Ｎａｔ　Ｓｃｉｅ　Ｈｕｎａｎ　Ｎｏｒｍ　Ｕｎｉ　

Ｖｏ１．２５　Ｎ【ｌｌ３　

第２５卷第３期　

Ｓｅｐ．．２００２＿　

基于Ｄｅｌｐｈｉ　５核心技术的分布式　

Ｗｅｂ网站实现技术　

王绍恒　，王志刚　

（１．重庆三峡学院计算机科学系，中国重庆４０４０００；２．湖南师范大学理学院计算机系，中国长沙４１００８１）　

摘要：比较了几种主要的　ｅｂ了Ｔ发技术，介绍一种基于Ｄｅｌｐｌｉｆ　５核心技术支持的分布式Ｗｅｂ网站的开发方　

法，并给出了运用Ｄｅｌｐｌｉｆ　５的Ｗｅｂ核心技术开发税法查询Ｗｅｂ系统的一些细节．　

关键词：分布式Ｗｅｂ；ＸＭＬ；ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ　

中图分类号：Ｏ１７１．７　文献标识码：Ａ　文章编号：１０００－２５３７（２００２－）０３—００２－８—０４　

Ｔｈｅ　Ｍｅｔｈｏｄｓ　ｏｆ　Ｄｅｖｅｌｏｐｉｎｇ　Ｄｉｓｔｒｉｂｕｔｅｄ　Ｗｅｂ　ｂａｓｅｄ　ｏｎ　ｔｈｅ　Ｔｅｃｈｎｏｌｏｇｉｅｓ　ｏｆ　Ｄｅｌｐｈｉ　５　

ＷＡＮＧ　Ｓｈａｏ－ｈｅｎｇ‘

，

ＷＡＮＧ　Ｚｈｉｇ－ａｎｇ　

（１．Ｄｅｐａｍｎｅｎｔ　ｏｆ　Ｃｏｍｐｕｔｅｒ　Ｓｃｉｅｎｃｅ，Ｃｈｏｎｇｑｉｎｇ　Ｔｌｕ－ｅｅ　Ｇｏｒｇｅｓ　Ｃｏｌｌｅｇｅ，Ｃｈｏｎｇｑｉｎｇ　４Ｏ４０Ｏ０，Ｃｌｉｆｎａ；　

２．Ｄｅｐａｒｔｍｅｎｔ　ｏｆ　Ｃｏｍｐｕｔｅｒ，ｃｉＳｅｎｃｅ　Ｃｏｌｌｅｇｅ，Ｈｕｎａｎ　Ｎｏｒｍａｌ　Ｕｎｉｖｅｒｓｉｔｙ，Ｃｈａｎｇｓｈａ　４１００８１，Ｃｌｉｆｎａ）　

Ａｂｓｔｒａｃｔ：Ｔｈｅｒｅ　ａｒｅ　Ｓｅｖｅｒａｌ　ｔｅｃｈｎｏｌｏｇｉｅｓ　ｏｆ　ｄｅｖｅｌｏｐｉｎｇ　ｄｉｓｔｒｉｂｕｔｅｄ　Ｗｅｂ，ｔｈｅｙ　ｗｉｌｌ　ｉｎｔｒｏｄｕｃｅ　ｎｅｗ　ｐｒｏｂｌｅｍｓ．Ｄｅｌｐｈｉ　５　

ｐｒｏｖｉｄｅｓ　ｓｏｍｅ　ｎｅｗ　ｔｅｃｈｎｏｌｏｇｉｅｓ　ｆｏｒ　ｄｅｖｅｌｏｐｉｎｇ　Ｗｅｂ　ｓｙｓｔｅｍｓ．Ｂｙ　ｕｓｉｎｇ　ｔｈｅｍ，ｗｅ　ｃａｎ　ｄｅｖｅｌｏｐｅｄ　ａ　ｈｉｇｈ　ｑｕａｌｉｔｙ　Ｗｅｂ　ＳＯｌａ，　ｅｌ‘　

ａｎｄ　ｐｒｅｓｅｎｔｅｄ　ｔｈｅ　ｍｅｔｈｏｄｓ　ｏｆ　ｄｅｖｅｌｏｐｉｎｇ　Ｗｅｂ　ｓｙｓｔｅｍ　ｗｉｔｈ　Ｄｅｌｐｈｉ　５．　

Ｋｅｙ　ｗｏｒｄｓ：ｄｉｓｔｒｉｂｕｔｅｄ　Ｗｅｂ；ＸＭＬ；ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ　

１现有的Ｗｅｂ实现技术　

目前在Ｗｉｎｄｏｗｓ平台中用来开发Ｗｅｂ和Ｉｎｔｅｍｅｔ／Ｉｎｔｒａｎｅｔ应用程序的技术大致上是以ＡＳＰ、ＶＢＳｃ￣・ｉｐｔ、　

Ｊａｖａ￣ｒｉｐｔ和ＨＴＭＬ／ＤＨＴＭＬ为主；使用这些技术来开发分布式Ｗｅｂ网站应用程序有许多的问题，首先是必须　

混合使用数种不同的技术．在客户端浏览器中必须使用ＨＴＭＬ和ＶＢＳｃｒｉｐｔ／ＪａｖａＳｃｆｉｐｔ脚本语言来处理用户在　

浏览器中的动作，在Ｗｅｂ服务器中则必须使用ＶＢ或者ＶＣ＋＋建立ＡＳＰ对象来处理浏览器的要求，此外ＡＳＰ　

对象还必须使用ＣＯＭ技术建立ＡＤＯ对象来存取数据．但是一般来说为了效率的因素，通常必须在Ｗｅｂ服务　

器中使用ＶＣ＋＋来开发ＡＳＰ对象．由于必须混合使用数种技术，因此效率不高，此外以这种实现技术取得的　

数据是静态的数据，如果需要开发能够更新数据的Ｗｅｂ应用程序，还必须编写大量的ＡＳＰ程序代码来更新　

和处理数据．　．　

为了避免在开发分布式ｗｅｂ网站时应用程序使用ＶＣ＋＋，还必须使用大量的ＶＢＳｃｒｉｐｔ脚本语言．这样虽　

然可以降低应用程序的复杂度，但是ＶＢＳｃｒｉｐｔ是没有效率的脚本语言，使用它编写一些简单的应用程序还可　

以，但若用它开发实际的分布式Ｗｅｂ网站应用系统，则应用程序执行效率很低．　

２　Ｄｅｌｐｈｉ　５提供的新技术　

Ｄｅｌｐｈｉ　５在Ｉｎｔｅｍｅｔ／Ｉｎｈｎｎｅｔ、ｗｅｂ和电子商务部分提供了非常强劲的支持，它除了可以开发Ｗｅｂ应用系统　

收稿日期：２００２—０１—０８　

基金项目：湖南省青年骨干教师基金和重庆三峡学院重点科研基金资助项目　

作者介绍：王绍恒（１９６１一），男，重庆人，副教授，主要从事计算机应用教学与研究　

维普资讯

第３期　王绍恒等：基于Ｄｅｌｐｌｉｆ　５核心技术的分布式Ｗｅｂ网站实现技术　

之外，还加入了ＸＭＬ协议．此外Ｄｅｌｐｌ１ｉ　５允许只使用Ｄｅｌｐｈｉ便能够开发ＡＳＰ对象、Ｗｅｂ应用程序、ＭＴＳ刘　象以　

及使用ＡＤＯＥｘｐｒｅｓｓ组件存取数据库之中的数据．只需要使用Ｄｅｌｐｈｉ便能够完成大部分的工作，而不需要同　

时使用数种不同的语言和技术开发Ｗｅｂ应用系统．因为Ｄｅｌｐｈｉ　５使用了ＨＴＭＬ　４．０，ＸＭＬ以及内嵌的Ｊ叭’ａＳ—　

ｃｒｉｐｔ脚本语言技术，从ｗｅｂ应用程序、ＡＳＰ对象到存取数据的ＡＤＯ对象都可以使用Ｄｅｌｐｈｉ　５完成，而且不论　

是ＩＥ或是Ｎｅｔｓｃａｐｅ都可以正确地执行．　

２．１　ＩｎｔｅｒｎｅｔＥｘｐｒｅｓｓ技术　

ＩｎｔｅｍｅｔＥｘｐｌ＇ｅｓｓ组件是Ｄｅｌｐｈｉ　５为支持Ｉｎｔｅｍｅｔ／Ｉｎｔｒａｎｅｔ解决方案而提供的一个超前开发工具．ＩｎｔｅｍｃｔＥｘ—　

Ｄｌ＂ｅｓｓ只包含了　ｒＸＭＬＢｍｋｅｒ和ＴＭＩＤＡＳＰａｇｅＰｌｘｘｔｕｃｅｒ这两个组件，其中ＴｘＭＬＢｍｋｅｒ组件可以从分布式Ｗｅｂ网　

站应用程序服务器或是ＭＴＳ对象取得数据，ｊ｛　将ＭＩＤＡＳ封装的数据转换为ＸＭＬ格式．由于使用了ＸＭＬ格　

式，因此这些数据库中的数据便可以和其它来源的数据（例如ｗｏｒｄ，Ｅｘｃｅｌ或Ｏｕｄｏｏｋ的数据）集成在一起．　

ＴＭＩＤＡＳＰａｇｅＰＩｘｘｔＵＣｅｌ＂从　ｒＸＭＬＢｍｋｅｒ组件取得以ＸＭＬ封装的数据，再集成ＨＴＭＬ／ＸＭＬ，或是用户使用其它　

ＨＴＭＬ编辑器设计的样版ＩＴＩ￣Ｌ主页，以及内嵌的ＪａｖａＳｅｒｉｐｔ脚本语言，进而汇整成一个有效的主页内容，最　

后再传送给Ｗｅｂ网站服务器，由Ｗｅｂ网站服务器把结果主页内容送回客户端浏览器中．另外，ＴＭＩＤ—　

ＡＳＰａｇｅＰｌｘｘｔｕｃｅ・・组件还提供了一个可视化组件编辑器，可以像ＦｒｏｎｔＰａｇｅ一样用可视化的方式设计主页内容．　

由于ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ组件只是把数据库中的数据以可视化的方法设计，再封装成ＨＴＭＬ／ＸＭＬ的格式传递　

给客户端浏览器中，它并不包含用户在客户端浏览器中和Ｗｅｂ服务器之间通信的功能．但是分布式Ｗｅｂ查　

询系统中，用户一定会在客户端浏览器中执行一些动作，例如点击一个按钮查询数据等．　

这些通信需要一种技术能够在Ｗｅｂ网站应用程序中编写提供用户要求的服务程序码．在Ｄｅｌｐｈｉ中除了　

可以使用ＡＳＰ之外，也可以使用ＷｅｂＢｒｏｋｅｒ技术处理这个问题，ＡＳＰ只能使用在Ｍｉｃｍｓｏｆｔ的ＩＩＳ　Ｗｅｂ服务器　

中，Ｄｅｌｐｈｉ的ＷｅｂＢｒｏｋｅｒ技术却可以同时使用在ＩＩＳ，Ｎｅｔｓｃａｐｅ服务器或者ＣＧＩ服务器之中，而且Ｄｅｌｐｈｉ　５还可　

以使用可视化的方式来开发ＡＳＰ对象．　

ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ技术不是单独存在的，一个完整的分布式Ｗｅｂ应用系统，需要同时使用ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ技　

术以及ＷｅｂＢｍｋｅｒ技术．通过ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ技术来封装ＸＭＬ的数据再通过ＷｅｂＢｒｏｋｅｒ和客户端用户通信，查　

询用户提出的要求并且满足客户端的需要．结合ＭＩＤＡＳ应用程序服务器或ＭＴＳ便可以提供一个大型、具得　

高度扩展性的分布式Ｗｅｂ网站．ＷｅｂＢｒｏｋｅｒ是在第一线和用户通信的技术，通过ＷｅｂＢｍｋｅｌ・客户端用户提出　

什么要求，以及客户端用户需要查询什么数据，或者更新了什么数据．ＷｅｂＢｒｏｋｅｒ允许使用事件处理函数来处　

理』兀户在客户端浏览器中提出的服务（见图１所示）．　

２．２　ＸＭＬ和分布式Ｗｅｂ应用系统　

ＸＭＬ（Ｅｘｔｅｎｓｉｂｌｅ　Ｍａｒｋｕｐ　Ｌ加ｇｕａ　）似乎是继ＨＴ—　

ＭＬ之后又一个封装数据的标准．由于ＸＭＬ几乎能　

够封装任何种类的数据，又逐渐成为交换数据的业　

界标准，因此分布式Ｗｅｂ网站应使用ＸＭＬ来封装　

以及交换数据．　

使用ＸＭＬ来封装数据不但可以在数据中封装　

数据代表的意义，也可以和其它的ＸＭＬ数据来源　

交换数据．由ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ设计的浏览器可视化　

图形用户界面以及在Ｗｅｂ服务器和浏览器之间交　

ＩＥ／Ｎｅｔｓｃａｐｅ　

换的数据都是以ＸＭＬ格式来封装的．因此由Ｄｅｌｐｈｉ　

图ｌ　ＷｅｂＢｒｏｋｅｒ及ＩｎｔｅｍｅｔＥｘｐｒｅｓｓ应．｝千ｌ示　

开发的分布式Ｗｅｂ网站可以轻易地和其它的开发工具或者应用程序交换数据．ＸＭＬ除了可以封装数据之　

外，Ｍｉｃｍｓｏｆｔ以及一些其它的厂商已经在提议使用ＸＭＬ来开发Ｉｎｔｅｍｅｔ／Ｉｎｔｒａｎｅｔ或者Ｗｅｂ应用系统．许多的数　

据库厂商声明支持ＸＭＬ，因此现在ＸＭＬ已经在Ｉｎｔｅｍｅｔ／Ｉｎｔｒａｎｅｔ、Ｗｅｂ、数据库和中间件中占有了显著且重要的　

地位．　

２．３中间件和分布式ｗｅｂ应用系统　

用ＭｑＳ构造的分布式Ｗｅｂ网站应用系统是让Ｗｅｂ服务器服务ｍ　要求，让ＭＴＳ对象负责执行逻辑程　

序码，因此可以适当的分散分布式Ｗｅｂ网站应用系统的工作负荷．又由于ＭＴＳ提供了数据库连结Ｐｏｏｌｉｎｇ，线　

维普资讯

３０　湖南师范大学自然科学学报　第２５卷　

程Ｐｏｏｌｉｎｇ，甚至在ＣＯＭ＋中提供了对象Ｐｏｏｌｉｎｇ，因此可以有效的减少分布式ｗｅｂ网站应用程序的执行效率．　

更何况ＭＴＳ／ＣＯＭ＋能够提供负载平衡的功能，因此可以让使用这种结构的分布式ｗｅｂ网站应用系统具有更　

好的扩展性．　

通常可以搭配ＡＳＰ或是ＩＳＡＰＩ／ＮＳＡＰＩ的分布式Ｗｅｂ网站应用程序和ＭＴＳ一起开发多层的分布式Ｗｅｂ　

网站应用系统．在这种结构中，仍然应该只编写简单的ＡＳＰ应用程序，这些ＡＳＰ应用程序只是调用ＭＴＳ对象　

来执行企业逻辑程序码．因此这些ＡＳＰ应用程序都非常的简洁，所以ＡＳＰ脚本语言应用程序也不会成为这　

种Ｗｅｂ结构的执行瓶颈．　

３分布式税法查询ＷＥＢ系统简介　

远程数据查询是计算机网络技术十分普及的一种应用．同时计算机网络技术与多媒体技术相结合，让用　

户在一个轻松的环境下进行工作．分布式税法查询ＷＥＢ系统为用户提供通过Ｉｎｔｅｍｅｔ查询国家与地方税法　

税规条文，主要功能包括标题查询、关键词查询、单项查询功能（如分别查询文件名、文号、文件发放时问、关　

键词、文中含有关键字）、组合查询功能（对文件名、文号、文件发放时间、关键词、文中含有关键字几个条件　

中满足两或两个以上或全部条件时进行查询）、模糊查询功能（对文件名、文号、文件发放时间、关键词、文中　

含有关键字中所含任意条件进行查询）．　

分布式税法查询ＷＥＢ系统包括两个主要部分：一是远程数据服务器，该数据服务器的功能主要是根据　

ＥＢ应用程序的要求从数据库中读取适当的数据，并传送给ＷＷＥＢ应用程序；二是ＷＥＢ应用程序，ＷＥＢ应　

用程序根据用户端浏览器的要求激活相应的ａｃｔｉｏｎ处理程序执行，生成Ｈ＇Ｉ￣Ｌ文件格式后再通过ＷＥＢ服务　

器发送到用户端浏览器，浏览器解释ＨＴＭＬ后在用户终端上显示出相应的页面．鉴于篇幅有限，这里只给出　

将税法条文标题数据集转换为超级链接ＨＴＭＬ文件的ａｃｔｉｏｎ程序段ＴＷｅｂＭｏｄｕｌｅ１．ａｂｃ和用户点击某一标题　

后查找全文并回送到用户的ａｃｔｉｏｎ程序段ＴＷｅｂＭｏｄｕｌｅ１．ｒｅａｄｆｉｌｅ．　

３．１程序段ｒＩ＇、＾　ｏｄｕｌｅ１．ａｂｃ　

ｐｒｏｃｅｄｕｒｅ　ＴＷｅｂＭｏｄｕｌｅ１．ａｂｅ（Ｓｅｎｄｅｒ：ＴＯｂｊｅｃｔ；Ｒｅｑｕｅｓｔ：ＴＷｅｂＲｅｑｕｅｓｔ；　

Ｒｅｓｐｏｎｓｅ：ＴＷｅｂＲｅｓｐｏｎｓｅ；ｖａｌ＂Ｈａｎｄｌｄ：Ｂｏｏｌｅｅａｎ）；　

ｆｕｎｃｔｉｏｎ　ｍａｋｅｓｕｐｅｒｌｉｎｋ：ｓｔｉｒｎｇ；　／／生成标题超级链接的子函数　

ｂｅｇｉｎ　

ｒｅｓｕｌｔ：＝’（Ａ　ＨＲＥＦ＝／ｓｈｕｉｆａ２．ｄｌｌ／税法？ｗｉｓｈ＝’＋　

ｑｕｅｌｙＩ．ＦｉｅｌｄＢｙＮａｍｅ（’ｓｈ’）．ＡｓＳｔｒｉｎｇ＋’）’＋　

ｑｕｅｌｙＩ．ＦｉｅｌｄＢｙＮａｍｅ（’ｗｊ’）．ＡｓＳｔｒｉｎｇ＋’（／Ａ）’；　

ｅｎｄ；　

ｖａｌ‘ｓｔｒｌ：ｓｔｒｉｎｇ；　

ｅｇｂｉｎ　

ｓｔｒｌ：＝　：　

ｔｒｙ　

ｑｕｅｒｙＩ．ａｃｔｉｖｅ￣＝ｔｒｕｅ；　

ｗｈｉｌｅ　ｎｏｔ　ｑｕｅｒｙ１．Ｅｏｆ　ｄｏ　

ｅｇｉｂｎ　

ｓｔｒｌ：＝ｓｔｒｌ＋’（Ｐ）’＋ｍａｋｅｓｕｐｅｒｌｉｎｋ＋’＜／Ｐ）’；／／制作标题主页　

ｑｕｅｉｙ１．Ｎｅｘｔ；　

ｅｎｄ；　

ｉｎａｌ１ｆ）ｒ　

ｑｕｅｒｙ１．ａｃｔｉｖｅ：：ｆａｌｓｅ；　

ｅｎｄ；　

ｒｅｓｐｏｎｓｅ．ｃｏｎｔｅｎｔ：＝ｓｔｒｌ；　／／将标题主页赋值给ｒｅｓｐｏｎｓｅ，准备回送　

维普资讯

第３期　

ｈａｎｄｌｅｄ：＝ｔｒｕｅ：　

王绍恒等：基于Ｄｅｌｐｈｉ　５核心技术的分布式Ｗｅｂ网站实现技术　３　

ｅｎｄ；　

３．２程序段ＴＷｅｂＭｏｄｕｌｅ１．ｒｅａｄｔ＇ｌｆｅ　

ｐｒｏｃｅｄｕｒｅ　ＴＷｅｂＭｏｄｕｌｅＩ．ｒｅａｄｆｉｌｅ（Ｓｅｎｄｅｒ：ＴＯｂｊｅｃｔ；Ｒｅｑｕｅｓｔ：ＴＷｅｂＲｅｑｕｅｓｔ；　

Ｒｅｓｐｏｎｓｅ：ＴＷｅｂＲｅｓｐｏｎｓｅ；ｖａｒ　Ｈａｎｄｌｅｄ：Ｂｏｏｌｅａｎ）；　

ｖａｌ‘ｓｈＩ：ｓｔｌ‘ｉｎｇ；　

ｂｅｇｉｎ　

ｓｈＩ：＝ｒｅｑｕｅｓｔ．ｑｕｅｒｙｆｉｅｌｄｓ．ｖａｌｕｅｓ［’ｗｊｓｈ’］；／／从ｒｅｑｕｅｓｔ读取用户指定的文件序号　

ｔ１　

ｑｕｅｒ）　１．ａｃｔｉｖｅ：　ｔｒｕｅ；　

ｗｈｉｌｅ（ｎｏｔ　ｑｕｅｒｙ１．Ｅｏｆ）ａｎｄ（ｑｕｅｒｙＩ．ＦｉｅｌｄＢｙＮａｍｅ（’ｓｈ’）．Ａｓ，Ｓｔｉｒｎｇ（）ｓｈ１）ｄｏ　

ｕｅｒｑｙＩ．Ｎｅｘｔ；　

ｉｆｎａｌｌｙ　

／／查找全文　

／／找到后生成ＨＴＭＬ段　ｉｆ　ｎｏｔ　ｑｕｅｒｙＩ．Ｅｏｆ　ｔｈｅｎ　

ｒｅｓｐｏｎｓｅ．ｃｏｎｔｅｎｔ：＝’（Ｐ）’＋ｑｕｅｒｙ１．ＦｉｅｌｄＢｙＮａｍｅ（’ｗｊｎｒ’）．Ａｓ，Ｓｔｉｒｎｇ＋’（／Ｐ）’ｅｌｓｅ　

ｒｅｓｐｏｎｓｅ．ｃｏｎｔｅｎｔ：＝’（Ｐ）文件没找到！（／Ｐ）’；　

ｑｕｅｌ３，１．ａｃｔｉｖｅ：＝ｆａｌｓｅ；　

ｅｎｄ；　

ｈａｎｄｌｅｄ：＝ｔｒｕｅ；　

ｅｎｄ；　

说明：ｑｕｅｒｙＩ是通过可视化设计方法连到税法条文库的ｑｕｅｒｙ控件．　

４小结　

运用Ｄｅｌｐｈｉ　５开发Ｗｅｂ的一部分工作可以在可视化环境下进行，本文不予描述的原因是需要的图片太　

多，占篇幅太大，故省去．选择适当的分布式Ｗｅｂ开发工具是成功的第一步，从以上的例子来看运用Ｄｅｌｐｈｉ　

５提供的技术对于提高工作效率是有很大帮助的，特别适合开发以动态数据库访问为主的分布式ＷＥＢ网　

站．　

参考文献：　

［１］李维．Ｄｅｌｐｌｉｆ　５．ｘ分布式多层应用系统篇［Ｍ］．北京：机械工业出版社，２０００．　

［２］徐新华．Ｄｅｌｐｈｉ　５高级编程．ＣＯＭ，ＣＯＲＢＡ和Ｉｎｔｅｍｅｔ编程［Ｍ］．北京：人民邮电出版社，２０００．　

［３］王志刚．基于ＭＩＤＡＳ分布式多层系统的容错技术［Ｊ］．湖南师范大学自然科学学报，２００１，２４（２）：１５．１７