用BCB研发多层数据库应用程式

继Client/Server结构在MRP、MIS等数据库应用系统红火之后，多层结构（Multi_Tier）开始登场，许多厂商提供了各种中间件。本文描述了用Borland C Builder（以下简称BCB）所提供的Multi_Tier构件来研发多层数据库应用程式的方法。

　　一、 Multi_Tier结构的实现
　　C Builder提出的Multi_Tier是把以前的Client/Server前端应用程式里的BDE、SQL Link和DataModule拿到另一台NT服务器上，也叫应用程式服务器，前端机只留下应用程式及DBClient.DLL,而移到应用程式服务器上的DataModule则变成一个COM程式,此COM程式是通过BDE 、SQL Link传输SQL到后端数据库,并从后端数据库存取数据，然后由Tdatasetprovider组件把读取的Dataset压缩并切割成一段一段的数据包（data packet）通过DCOM的机制传给前端机，前端机上的DBClient.DLL会把接收到的数据包再还原成DataSet传给程式中的TclientDataSet组件,Data Control组件就能够TclientDataSet为数据源对之进行操作，而COM程式会把修改后的DataSet正确地写回后端数据库。

　　和Client/Server结构相比，Multi_Tier结构具备很多长处，主要表现在：

　　1. 大幅度地减少数据库服务器的负担。因为多了一层应用程式服务器，接管了众多客户机的Connection处理，数据库服务器只需处理应用服务器的Connection，这样就不会因为用户（Client）数的增加而影响系统的运行性能。

　　2. 前端机应用程式安装方便。Multi_Tier结构中，把以前的Client/Server前端应用程式内的BDE、SQL Link和DataModule拿到数量很少的应用服务器上，前端机只负责Use Interface的处理，只需要一个单纯的EXE文档（包括DBClient.DLL）,能够在应用服务器上研发前端应用程式,通过网络复制到各个前端机上。

　　二、 环境配置
　　1.后端数据库服务器配置

　　包括数据库系统及数据库提供的中间件。本文具体环境为：

　　VMS操作系统上安装Oracle7.3。

　　2.应用程式服务器配置

　　（1）在PC Server上安装Windows NT ，使他成为一台Microsoft NT Server；

　　（2）确保网络的畅通,即网络层的通讯协议的畅通；

　　（3）安装数据库系统提供的中间件,本文是Oracle提供的Oracle for NT 的SQL？NET产品,执行SQL？NET Easy Configuration工具,设定Oracle的TNS连接参数,加入一个数据库别名,连上后端的Oracle数据库服务器；

　　（4）安装BDE Administrator，设定BDE的参数内容，具体步骤如下：

　　Databases中先新建一个别名，本文是Oracle2，其中的参数改为：

server name 　　数据库服务器的别名
net protocol 　　tns
user name 　　　oracle的用户名/口令

　　（5）安装C Builder 5软件,用于研发应用服务器和客户端的程式。

　　3.前端客户机配置

　　（1）安装操作系统Windows 95/98,本文是Windows 98，确保各前端机和应用服务器在TCP/IP层上连通；

　　（2）从NT服务器的WinntSystem32目录下复制DBClient.DLL到本机的WindowsSystem；

　　（3）如操作系统为Windows 95,必须安装DCOM程式,因为Windows 98 和Windows NT Workstation已内含DCOM程式,不需另外安装；

　　（4）在应用服务器上研发应用程式，通过网络复制。

　　三、实现步骤
　　下面是个对材料库存表进行维护的Multi_Tier结构数据库管理程式，用户能够在前端的Windows 98机上通过中间的NT应用服务器对Alpha机上的Oracle数据库上的库存表进行维护。

　　1.应用服务器上程式的研发

　　（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。

　　（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别配置属性如下:

database1 aliasname 　　oracle2
　　　　　databasename 　test
　　　　　connected　　　 true
table1 databasename 　　test
　　　　tablename 　　　kcb
　　　　active 　　　　true
datasetprovider 　dataset 　table10
　　　　　　　　　expo0rted t　rue

　　前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程式。

　　(3)在Forms1加一个Lable组件，上面写上“服务器应用程式已被启动”，这样运行时屏幕上就会出现这句话，说明程式已被调用。

　　(4)为了前端程式能连上此COM程式，必须把他注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。

　　2.前端程式的研发

　　(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。

　　DCOMConnection1配置如下属性:

computername 应用服务器的机器名
servername　　 project1.kcbb

　　ClientDataSet1配置如下属性:

remoteserver dcomconnection1
provider　　 table1
active 　　　　true

　　DataSource的DATASET配置为ClientDataSet1；

　　Dbgrid的DataSource配置为DataSource1。

　　(2)拖7个Button来当作功能按钮 ，分别设为新增、修改、删除、取消、写入、重新读取、返回 。由于BCB提供了ActionList组件,其中包括了StandardAction,能够利用这些标准的Action来编写Dataset的编辑功能, 只要把Button的属性Action依照每Button所赋予的功能指向对应的ActionList项即可。

　　最后，将调试好的前端程式复制到任何的前端机中，运行调试，一个Multi_Tier结构的数据库应用程式就可投入使用了。


　　本文仅仅描述了研发Multi_Tier结构的数据库应用程式的一种基本方法，还需要我们在实际应用中进一步完善，如怎样提高数据在其上的传输效率及数据传输中的出错处理等都需要进一步地编程实现。