- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0

我的地盘我做主
该用户从未签到
 |
< >邓未玲 2000-11-16 16:27:11 </P># z, ~$ \/ ]& `% C
< > 继Client/Server结构在MRP、MIS等数据库应用系统红火之后,多层结构(Multi_T </P>
* K8 y5 l! e! w: y9 E! ]5 n< >ier)开始登场,许多厂商提供了各种中间件。本文描述了用Borland C++ Builder(以 </P>1 z. @: V% ?/ @( V E
< >下简称BCB)所提供的Multi_Tier构件来开发多层数据库应用程序的方法。 </P>, S. D2 b+ V) i, I2 Q
< > 一、 Multi_Tier结构的实现 </P>; l8 P, s% ]3 S; N" x9 y s! ~
< > C++ Builder提出的Multi_Tier是把以前的Client/Server前端应用程序里的BDE、S </P> r1 M$ F: z9 U, C3 r& I
< >QL Link和DataModule拿到另一台NT服务器上,也叫应用程序服务器,前端机只留下应用 </P>
" B. t( i9 z4 v< >程序及DBClient.DLL,而移到应用程序服务器上的DataModule则变成一个COM程序,此COM </P>
) c% C5 ?( o+ U2 S6 f2 o- y< >程序是通过BDE 、SQL Link传输SQL到后端数据库,并从后端数据库存取数据,然后由Td </P>. g. e2 W. J z
< >atasetprovider组件把读取的Dataset压缩并切割成一段一段的数据包(data packet) </P>
7 Z8 e B0 n- L! `+ Z2 R2 R L9 N< >通过DCOM的机制传给前端机,前端机上的DBClient.DLL会把接收到的数据包再还原成Da </P>9 T& e* y9 H1 J7 J# o. s8 J
< >taSet传给程序中的TclientDataSet组件,Data Control组件就可以TclientDataSet为数 </P>7 {. _4 i f6 D7 \& A2 e, e& {
< >据源对之进行操作,而COM程序会把修改后的DataSet正确地写回后端数据库。 </P>
% \7 ]! ?* X' o! E6 M# k< > 与Client/Server结构相比,Multi_Tier结构具有很多优点,主要表现在: </P>
' `. m& V( [" k% h7 |6 b< > 1. 大幅度地减少数据库服务器的负担。因为多了一层应用程序服务器,接管了众多 </P>
1 o2 `6 I- A' I; q7 {2 S8 l< >客户机的Connection处理,数据库服务器只需处理应用服务器的Connection,这样就不 </P>
& ?) q' w6 ?' B" E2 ~0 y; z6 M< >会因为用户(Client)数的增加而影响系统的运行性能。 </P>
! k7 z' h% s! P+ T# z< > 2. 前端机应用程序安装方便。Multi_Tier结构中,把以前的Client/Server前端应 </P>
' b$ N1 \: \. o8 Y, ^< >用程序内的BDE、SQL Link和DataModule拿到数量很少的应用服务器上,前端机只负责U </P>
- s; z9 O+ U) B! |7 G< >se Interface的处理,只需要一个单纯的EXE文件(包括DBClient.DLL),可以在应用服 </P>* \; U( E: B4 ^- n
< >务器上开发前端应用程序,通过网络复制到各个前端机上。 </P>/ e! V% Z4 {6 g2 @! _0 [: X
< > 二、 环境配置 </P>
3 a) I. N; H# }< > 1.后端数据库服务器配置 </P>
( F9 t; J2 S* E# U# q4 a< > 包括数据库系统及数据库提供的中间件。本文具体环境为: </P>
7 m7 X, L. b9 R; ~/ e8 i< > VMS操作系统上安装Oracle7.3。 </P>
' n9 k3 v) y" V5 n6 W< > 2.应用程序服务器配置 </P>
4 ~( V/ s p; U) C: N< > (1)在PC Server上安装Windows NT ,使它成为一台Microsoft NT Server; </P>
8 K1 a5 P5 F: x( w* H< > (2)保证网络的畅通,即网络层的通讯协议的畅通; </P>; W, U8 l0 m) n0 M# k) S' s* U1 ?! @
< > (3)安装数据库系统提供的中间件,本文是Oracle提供的Oracle for NT 的SQL?N </P>
$ \3 v V# O j0 j; j< >ET产品,执行SQL?NET Easy Configuration工具,设定Oracle的TNS连接参数,加入一个数 </P>( }+ B" f; \0 v: d
<P>据库别名,连上后端的Oracle数据库服务器; 3 g$ ]0 A$ u! _) ~5 c
(4)安装BDE Administrator,设定BDE的参数内容,具体步骤如下: </P>% p1 \ q K8 p
<P> Databases中先新建一个别名,本文是Oracle2,其中的参数改为: </P>3 S6 [- w/ h7 F; \! \- `
<P>server name 数据库服务器的别名 </P>' e: m; D' O- B: G
<P>net protocol tns </P>7 m1 s" F5 h- q9 n/ j1 n/ Z
<P>user name oracle的用户名/口令 </P>
' z8 a5 ~( \9 U; @& U<P> (5)安装C++Builder 5软件,用于开发应用服务器和客户端的程序。 </P>3 p0 C2 v8 @% T& C1 ^0 y# p
<P> 3.前端客户机配置 </P>
( ?% R/ W( L& h0 Q( \: n<P> (1)安装操作系统Windows 95/98,本文是Windows 98,保证各前端机与应用服务器 </P>
( Q/ T1 j' q/ o- p" l<P>在TCP/IP层上连通; </P>: D$ L# p, r2 |1 D7 ?
<P> (2)从NT服务器的WinntSystem32目录下复制DBClient.DLL到本机的WindowsSyste </P>; C4 c1 I$ B) @9 C9 Q: e* j) H
<P>m; </P>
. P6 V* }; J6 c; V: ]! L2 S<P> (3)如操作系统为Windows 95,必须安装DCOM程序,因为Windows 98 与Windows NT </P>2 y8 [7 ~5 n' f; p$ `# J. k
<P> Workstation已经内含DCOM程序,不需另外安装; </P>, @! G% i6 e. t
<P> (4)在应用服务器上开发应用程序,通过网络复制。 </P>8 ~( H* q9 I) o
<P> 三、实现步骤 </P>" |" q% S6 t. a& D3 w6 x8 ^: C
<P> 下面是一个对材料库存表进行维护的Multi_Tier结构数据库管理程序,用户可以在 </P>. d3 H* l; ]0 W9 m
<P>前端的Windows 98机上通过中间的NT应用服务器对Alpha机上的Oracle数据库上的库存表 </P>. w H. A) {/ N/ `
<P>进行维护。 </P>
7 B( z7 a1 U0 u/ x<P> 1.应用服务器上程序的开发 </P>
: i8 u% _$ _2 C! w. P& [<P> (1)打开一个新工程,然后点主功能选单NEW中的RemoteDataModule,并填入Cocla </P>2 T8 b7 |% @/ `. J+ |/ n/ L9 d
<P>ss Name项,这里是KCBB。 </P>
1 {9 V1 Q* d. y<P> (2)在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分 </P>: t$ R* o, J5 v1 J
<P>别设置属性如下: </P>
+ I3 ?4 G; P2 k1 F. V<P>database1 aliasname oracle2 </P>: _* G5 j7 n% G+ @& {5 f% I7 s
<P> databasename test </P>- c% b/ ?6 d; e( X1 U% K y- T! |
<P> connected true </P>
/ { _: |% `$ o; i8 W3 x# b' V<P>table1 databasename test </P>: C9 k# j9 E# C9 o
<P> tablename kcb </P>' R" u) E* P% k) X
<P> active true </P># K' `. [# d a* A% H
<P>datasetprovider dataset table10 </P>3 n/ i5 }* Z5 \# D" J0 i* |( I: B
<P> expo0rted t rue </P>
+ y) Q7 u# }) V4 I. S2 v1 q% u<P> 前六行目的是连上后端数据库Oracle2的表KCB,后两行目的是DataSetProvider组件 </P>
; q( ]) d7 U1 R& S3 z3 _% \<P>将表KCB作为DATASET传给前端程序。 </P>
6 |8 K( M( ]6 J8 Y' W8 |" u& O<P> (3)在Forms1加一个Lable组件,上面写上“服务器应用程序已被启动”,这样运行 </P>
7 b# l- Z! v6 W( o8 f<P>时屏幕上就会出现这句话,说明程序已被调用。 </P>, d; v9 e7 I& R6 t( V: w' j
<P> (4)为了前端程序能连上此COM程序,必须把它注册到服务器的注册表内,可通过运 </P>. L- q0 `2 X! M0 }4 ^
<P>行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。 </P>
. X, p9 V8 K/ V& m% a4 z/ U4 i% j: a<P> 2.前端程序的开发 </P>
. z6 s, \( o' W" @<P> (1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、Dat </P>
+ C4 A4 x" K( k3 |( B- A' U<P>aSource组件、Dbgrid组件到FORM1上。 </P>4 U+ v0 H& T* M9 O
<P> DCOMConnection1设置如下属性: </P>
$ O* d" ]' _# v A6 P<P>computername 应用服务器的机器名 </P>
^! _6 h' `1 o; z, p3 r<P>servername project1.kcbb </P>
3 Q1 Z0 T2 {" R( F4 S- d<P> ClientDataSet1设置如下属性: </P>2 m8 c* S7 |" ?- o$ o" |
<P>remoteserver dcomconnection1 </P>9 ]* s9 D7 a4 [3 k' _2 T9 O+ w1 t$ A
<P>provider table1 </P>
6 |% ^5 z( S3 X9 l% U6 v3 T<P>active true </P>
y! W' \/ ^3 I5 X# p<P> DataSource的DATASET设置为ClientDataSet1; </P>
J. \" W. X4 D* v7 T<P> Dbgrid的DataSource设置为DataSource1。 </P>
$ h r8 ]) m/ H; h<P> (2)拖7个Button来当作功能按钮 ,分别设为新增、修改、删除、取消、写入、重新 </P> y i6 a# x" W5 a b$ o
<P>读取、返回 。由于BCB提供了ActionList组件,其中包括了StandardAction,可以利用这 </P>
$ t1 Q6 c6 |* I: [* s/ Q( r<P>些标准的Action来编写Dataset的编辑功能, 只要把Button的属性Action依照每Button所 </P>! L% ?7 z/ X- l/ k0 x# u. u' N5 x! d
0 ^& L- Z' u5 y' r<P>赋予的功能指向对应的ActionList项即可。 </P>
7 y0 K7 W& i" X, ?8 c8 x" b<P> 最后,将调试好的前端程序复制到所有的前端机中,运行调试,一个Multi_Tier结 </P>0 n0 ^3 ^0 E0 k# T
<P>构的数据库应用程序就可投入使用了。 </P>3 F4 ^. {3 {: W3 S
<P> 本文仅仅描述了开发Multi_Tier结构的数据库应用程序的一种基本方法,还需要我 </P>
" Y$ B6 l' Y! V' M1 L<P>们在实际应用中进一步完善,如怎样提高数据在其上的传输效率及数据传输中的出错处 </P>
8 L; ~+ V6 P6 @* s- H# _<P>理等都需要进一步地编程实现 </P> |
zan
|