数学建模社区-数学中国

标题: 用BCB开发多层数据库应用程序 [打印本页]
作者: 韩冰    时间: 2005-1-26 12:36
标题: 用BCB开发多层数据库应用程序
<>邓未玲　2000-11-16 16:27:11 </P>
  Z& b. W$ `3 f9 J' }1 ]* i1 C<>　　继Client/Server结构在MRP、MIS等数据库应用系统红火之后，多层结构（Multi_T </P>) E- R& d# K! }! B
<>ier）开始登场，许多厂商提供了各种中间件。本文描述了用Borland C++ Builder（以 </P>0 `) P4 g7 M  l5 X
<>下简称BCB）所提供的Multi_Tier构件来开发多层数据库应用程序的方法。 </P>4 l2 x6 B1 M  |4 `% Y# {" I
<>　　一、 Multi_Tier结构的实现 </P>
9 s$ H; N6 g% J<>　　C++ Builder提出的Multi_Tier是把以前的Client/Server前端应用程序里的BDE、S </P>% o# V$ C6 k. D: C3 V4 Z! U" T
<>QL Link和DataModule拿到另一台NT服务器上，也叫应用程序服务器，前端机只留下应用 </P>
9 @; b, y  ~8 k, b+ O( g<>程序及DBClient.DLL,而移到应用程序服务器上的DataModule则变成一个COM程序,此COM </P>% _* H; J- Y+ R
<>程序是通过BDE 、SQL Link传输SQL到后端数据库,并从后端数据库存取数据，然后由Td </P>3 E5 n0 F/ S, z& @1 y& h
<>atasetprovider组件把读取的Dataset压缩并切割成一段一段的数据包（data packet） </P>& _) l- r( f) ~8 k& S
<>通过DCOM的机制传给前端机，前端机上的DBClient.DLL会把接收到的数据包再还原成Da </P>
+ X( f4 {- }. W& B2 E7 B+ V( I<>taSet传给程序中的TclientDataSet组件,Data Control组件就可以TclientDataSet为数 </P>
8 a) b, p: H5 o2 Y& V2 }7 f1 R<>据源对之进行操作，而COM程序会把修改后的DataSet正确地写回后端数据库。 </P>
$ m. F$ x. u) @. P<>　　与Client/Server结构相比，Multi_Tier结构具有很多优点，主要表现在： </P>& b) F+ t7 M. R. k! X8 l6 J: L
<>　　1. 大幅度地减少数据库服务器的负担。因为多了一层应用程序服务器，接管了众多 </P>
: y% V: S( t( }& B$ w5 q& \5 ?) d<>客户机的Connection处理，数据库服务器只需处理应用服务器的Connection，这样就不 </P>0 I' I, N/ N6 L; V! ?- u$ {/ ^
<>会因为用户（Client）数的增加而影响系统的运行性能。 </P>  y9 i( a3 j, e9 S- j' P: L
<>　　2. 前端机应用程序安装方便。Multi_Tier结构中，把以前的Client/Server前端应 </P>
4 P3 c/ V6 k1 G+ @$ T& {4 d- k<>用程序内的BDE、SQL Link和DataModule拿到数量很少的应用服务器上，前端机只负责U </P>
9 ]  z; G- k& \3 Z8 E3 g<>se Interface的处理，只需要一个单纯的EXE文件（包括DBClient.DLL）,可以在应用服 </P>$ j! u7 ], t. u7 ^5 n, G
<>务器上开发前端应用程序,通过网络复制到各个前端机上。 </P>3 Y. x4 N% ?, g. P& u; O
<>　　二、 环境配置 </P>8 m9 a# W& T* u& f
<>　　1.后端数据库服务器配置 </P>; o" m- {5 N' A% [2 ?" z
<>　　包括数据库系统及数据库提供的中间件。本文具体环境为： </P>
! C8 i; U: ~2 k+ ^  Y( J<>　　VMS操作系统上安装Oracle7.3。 </P>
3 K( t( c# c9 _1 u<>　　2.应用程序服务器配置 </P>/ K% h& h1 F. r/ j5 g
<>　　（1）在PC Server上安装Windows NT ，使它成为一台Microsoft NT Server； </P>! a6 r7 D; S9 i! D; R; y9 X0 o" g
<>　　（2）保证网络的畅通,即网络层的通讯协议的畅通； </P>4 N$ `& P' n5 i5 b, Y, Y
<>　　（3）安装数据库系统提供的中间件,本文是Oracle提供的Oracle for NT 的SQL？N </P>
2 C* H  {; j4 W' S, X! P<>ET产品,执行SQL？NET Easy Configuration工具,设定Oracle的TNS连接参数,加入一个数 </P>$ \- F! C" g. K' i; u: T9 }
<P>据库别名,连上后端的Oracle数据库服务器；
& W" G- H- M7 u; ~6 `* N　　（4）安装BDE Administrator，设定BDE的参数内容，具体步骤如下： </P>
. \6 v/ |, a$ b" S$ O( s/ S% w  x<P>　　Databases中先新建一个别名，本文是Oracle2，其中的参数改为： </P>
# l* \3 R8 h# F- ]- k! [; c: [<P>server name 　　数据库服务器的别名 </P>
. Z5 d; x+ c- V5 z1 U4 V9 C' @<P>net protocol 　　tns </P>
# n: @& z5 B. C# A<P>user name 　　　oracle的用户名/口令 </P>& _  O7 [4 \- B) E1 N' ^  V
<P>　　（5）安装C++Builder 5软件,用于开发应用服务器和客户端的程序。 </P>; F# @, u. r5 F/ S0 ]0 `
<P>　　3.前端客户机配置 </P>: s! o0 }$ z3 b7 E- ~6 t. u9 x1 ^
<P>　　（1）安装操作系统Windows 95/98,本文是Windows 98，保证各前端机与应用服务器 </P>
$ }! f5 B; K" d6 _8 `<P>在TCP/IP层上连通； </P>2 W! f4 C8 G+ c# v4 C
<P>　　（2）从NT服务器的WinntSystem32目录下复制DBClient.DLL到本机的WindowsSyste </P>+ s& g, b# B7 u( a$ ~5 u# A
<P>m； </P>
2 ]4 W: V9 U. J<P>　　（3）如操作系统为Windows 95,必须安装DCOM程序,因为Windows 98 与Windows NT </P>& S, ?; L$ b: K% v: g' J/ I: v
<P> Workstation已经内含DCOM程序,不需另外安装； </P>/ b: ~  {2 O) k" D" ^7 g3 {% ^; }
<P>　　（4）在应用服务器上开发应用程序，通过网络复制。 </P>* D' ?+ @6 \/ Z. u
<P>　　三、实现步骤 </P>9 b3 w* k5 {# v* g4 ~0 a: L" k
<P>　　下面是一个对材料库存表进行维护的Multi_Tier结构数据库管理程序，用户可以在 </P>5 B+ [( N% T* a
<P>前端的Windows 98机上通过中间的NT应用服务器对Alpha机上的Oracle数据库上的库存表 </P>9 b3 H9 K- M$ d0 B
<P>进行维护。 </P>/ z( ^$ B( I8 L$ W& o, }( B
<P>　　1.应用服务器上程序的开发 </P>% w9 I% j; c# b9 N( b1 w% v
<P>　　（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Cocla </P>
) s( M+ K5 }: P; E+ T<P>ss Name项,这里是KCBB。 </P>) {  Z2 O: ]1 P! V7 d* F
<P>　　（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分 </P>" ~" }. `, C) N$ e6 J' w
<P>别设置属性如下: </P>9 ~0 }/ Z# W! B4 G& c" ?3 V! s
<P>database1 aliasname 　　oracle2 </P>/ q+ p' p( V  _6 @
<P>　　　　　databasename 　test </P>  C- a) S7 \6 t0 [9 S$ v
<P>　　　　　connected　　　 true </P>
7 y/ z( s) }8 P2 L' r: ?<P>table1 databasename 　　test </P>  {$ W* a: y; c9 L2 F
<P>　　　　tablename 　　　kcb </P>. S+ x! j4 W- g% D( g
<P>　　　　active 　　　　true </P>0 j; P* P& T! _1 ?& e& S
<P>datasetprovider 　dataset 　table10 </P>
( o% }& V5 i9 g) j7 F6 ~<P>　　　　　　　　　expo0rted t　rue </P>
% d1 N( Z$ U/ ]8 y8 m; T0 T+ h3 Y<P>　　前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件 </P>! [1 Z% |1 W0 R$ l) M
<P>将表KCB作为DATASET传给前端程序。 </P>2 c& b% s+ h- D/ `* [- f
<P>　　(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行 </P>; [5 W0 \2 E5 ~  D: O/ G. t: j
<P>时屏幕上就会出现这句话，说明程序已被调用。 </P>/ l# E6 I, E7 y5 [" K
<P>　　(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运 </P>
3 I8 d# i& P% y2 H. ]<P>行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。 </P>
* `1 J2 _" X4 t* L<P>　　2.前端程序的开发 </P>
1 P) K" o; b/ _' p5 L8 M" G/ A<P>　　(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、Dat </P>
: m, q3 w3 b6 ^6 `% W& `) \7 p<P>aSource组件、Dbgrid组件到FORM1上。 </P>4 p% Q: G  q* ]1 ]
<P>　　DCOMConnection1设置如下属性: </P>- `7 t1 z& M# I% p4 v
<P>computername 应用服务器的机器名 </P>2 V  x% u1 e3 [. m" A- o( d7 q3 o2 {
<P>servername　　 project1.kcbb </P>% W5 v3 o# u2 f* b$ n5 V
<P>　　ClientDataSet1设置如下属性: </P>4 G! M# ?' o. r4 M1 X! Q- a1 a
<P>remoteserver dcomconnection1 </P>. ^- U5 p5 l) y$ d% O) K/ E
<P>provider　　 table1 </P>2 n, e5 z- t, i& |
<P>active 　　　　true </P>$ @% F: [* T. q1 p
<P>　　DataSource的DATASET设置为ClientDataSet1； </P>7 l; T3 g6 {& v6 U
<P>　　Dbgrid的DataSource设置为DataSource1。 </P>: H1 F  f, ~; x! V: J- \
<P>　　(2)拖7个Button来当作功能按钮 ，分别设为新增、修改、删除、取消、写入、重新 </P>+ a4 Q" @1 ?) d6 g% L
<P>读取、返回 。由于BCB提供了ActionList组件,其中包括了StandardAction,可以利用这 </P>; Z1 [; [. Z2 M2 K& {4 Q6 j
<P>些标准的Action来编写Dataset的编辑功能, 只要把Button的属性Action依照每Button所 </P>
- o% u. a  ^3 c' q* Q+ x" J$ M% @' m7 F9 K
<P>赋予的功能指向对应的ActionList项即可。 </P>
! Z) u6 o1 R7 I<P>　　最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结 </P>& C6 o2 t- t9 ?  }/ Y7 w
<P>构的数据库应用程序就可投入使用了。 </P>$ h6 T) c. X9 D6 Z; Y- P
<P>　　本文仅仅描述了开发Multi_Tier结构的数据库应用程序的一种基本方法，还需要我 </P>! E; G: z$ ~$ H8 t5 O" E: H
<P>们在实际应用中进一步完善，如怎样提高数据在其上的传输效率及数据传输中的出错处 </P>/ ^1 F: c  j: p8 \# F. H% a
<P>理等都需要进一步地编程实现 </P>



欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5