- 在线时间
- 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>* K: m( V! k/ U% K8 h8 t7 ~$ U- x t
< > 继Client/Server结构在MRP、MIS等数据库应用系统红火之后,多层结构(Multi_T </P>
( N4 R r+ @/ i< >ier)开始登场,许多厂商提供了各种中间件。本文描述了用Borland C++ Builder(以 </P>0 W( k* E0 e& ~5 v+ Q& u
< >下简称BCB)所提供的Multi_Tier构件来开发多层数据库应用程序的方法。 </P>
7 Y( n, D/ W @! y8 m< > 一、 Multi_Tier结构的实现 </P>
1 G( B' @+ }+ t" j1 g6 b< > C++ Builder提出的Multi_Tier是把以前的Client/Server前端应用程序里的BDE、S </P>
* H' ]& r1 i* J* O h" i< >QL Link和DataModule拿到另一台NT服务器上,也叫应用程序服务器,前端机只留下应用 </P>5 x+ P9 [/ a# r1 n" O C
< >程序及DBClient.DLL,而移到应用程序服务器上的DataModule则变成一个COM程序,此COM </P>
* j" ~ j2 M, O, H5 v5 s4 r+ |+ Q< >程序是通过BDE 、SQL Link传输SQL到后端数据库,并从后端数据库存取数据,然后由Td </P>
- n R# I6 M9 e5 t9 ~2 H< >atasetprovider组件把读取的Dataset压缩并切割成一段一段的数据包(data packet) </P>
& f: N7 o, z0 b: k$ _7 {% n7 R< >通过DCOM的机制传给前端机,前端机上的DBClient.DLL会把接收到的数据包再还原成Da </P>
# C9 V/ y, v, C: }< >taSet传给程序中的TclientDataSet组件,Data Control组件就可以TclientDataSet为数 </P>- D5 {0 W2 w$ Q" n# Q# B. N+ b
< >据源对之进行操作,而COM程序会把修改后的DataSet正确地写回后端数据库。 </P>
f2 n6 b) v4 y: i, {< > 与Client/Server结构相比,Multi_Tier结构具有很多优点,主要表现在: </P>
& ]/ y- [1 |. ^$ S) m; E< > 1. 大幅度地减少数据库服务器的负担。因为多了一层应用程序服务器,接管了众多 </P>
! p5 Y5 x! p8 |/ U1 `< >客户机的Connection处理,数据库服务器只需处理应用服务器的Connection,这样就不 </P>; ]5 R2 N, |/ H
< >会因为用户(Client)数的增加而影响系统的运行性能。 </P>' {, t3 N0 }+ t: c- |
< > 2. 前端机应用程序安装方便。Multi_Tier结构中,把以前的Client/Server前端应 </P>9 `9 E: e4 a6 K5 f. }
< >用程序内的BDE、SQL Link和DataModule拿到数量很少的应用服务器上,前端机只负责U </P>! x, k( m( U q7 r" Y n2 y
< >se Interface的处理,只需要一个单纯的EXE文件(包括DBClient.DLL),可以在应用服 </P>
) k! T* Q& N/ {: a" e1 a. w/ j< >务器上开发前端应用程序,通过网络复制到各个前端机上。 </P>
0 U% G6 N5 Z5 N# h< > 二、 环境配置 </P>
! }; P# ^# }4 u; t- m+ G1 Z* e< > 1.后端数据库服务器配置 </P>: X! ]& e0 M4 k$ [
< > 包括数据库系统及数据库提供的中间件。本文具体环境为: </P>
' v/ p8 I; Y7 `) B# g3 O- ~6 y3 _< > VMS操作系统上安装Oracle7.3。 </P>
7 P0 R' \5 I8 d9 }2 h5 _* N9 d< > 2.应用程序服务器配置 </P>
$ @4 S$ T2 R: M! @9 [$ {< > (1)在PC Server上安装Windows NT ,使它成为一台Microsoft NT Server; </P>
& r0 D9 s8 _% y0 k+ G+ N< > (2)保证网络的畅通,即网络层的通讯协议的畅通; </P>; G% a# p. I p4 T
< > (3)安装数据库系统提供的中间件,本文是Oracle提供的Oracle for NT 的SQL?N </P>
/ u7 Q6 [# V% k8 d! t7 |3 W# s< >ET产品,执行SQL?NET Easy Configuration工具,设定Oracle的TNS连接参数,加入一个数 </P>! ~' O+ [) d& @& W- w+ \
<P>据库别名,连上后端的Oracle数据库服务器;
" e$ J; |8 h) l8 e' ^8 l1 L (4)安装BDE Administrator,设定BDE的参数内容,具体步骤如下: </P>
* P0 i: [- I% `2 g. D0 d<P> Databases中先新建一个别名,本文是Oracle2,其中的参数改为: </P>
. r$ i+ h! p$ I* b i0 c<P>server name 数据库服务器的别名 </P>
/ t* q- Z7 H/ y( ]: q1 y<P>net protocol tns </P>$ Z* c a w/ G3 |) P& a- |0 d; y
<P>user name oracle的用户名/口令 </P>$ ^: e$ {3 {: B8 z: l
<P> (5)安装C++Builder 5软件,用于开发应用服务器和客户端的程序。 </P>
5 S7 c2 l" p. @<P> 3.前端客户机配置 </P>& e: O4 h2 L( ?1 D) n$ o
<P> (1)安装操作系统Windows 95/98,本文是Windows 98,保证各前端机与应用服务器 </P>
J1 l/ J. k- J9 x* s% I<P>在TCP/IP层上连通; </P>) H% Z( Q9 D0 z+ i& V9 T
<P> (2)从NT服务器的WinntSystem32目录下复制DBClient.DLL到本机的WindowsSyste </P>2 t% {$ D1 Q, J8 h
<P>m; </P>
( |- a2 X$ j( p" X! M<P> (3)如操作系统为Windows 95,必须安装DCOM程序,因为Windows 98 与Windows NT </P>
) p5 C, K. u' E# L<P> Workstation已经内含DCOM程序,不需另外安装; </P>2 ?, h* s0 O: a0 r
<P> (4)在应用服务器上开发应用程序,通过网络复制。 </P>
, A& j! X, x# D1 f<P> 三、实现步骤 </P>( D' n; a; J: _: {. t
<P> 下面是一个对材料库存表进行维护的Multi_Tier结构数据库管理程序,用户可以在 </P>
( ?- N" ? X( I! B! U<P>前端的Windows 98机上通过中间的NT应用服务器对Alpha机上的Oracle数据库上的库存表 </P>- D& ^! ^6 g p8 ~1 |
<P>进行维护。 </P>
2 Y2 @% c- m* O% z<P> 1.应用服务器上程序的开发 </P>/ B5 `. t6 G ]; `8 T- k
<P> (1)打开一个新工程,然后点主功能选单NEW中的RemoteDataModule,并填入Cocla </P>, g# z: O0 Y1 \9 h- v2 M
<P>ss Name项,这里是KCBB。 </P>
" n8 f- p0 W, k/ X<P> (2)在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分 </P>) K+ Z q2 y! e; Z/ Q% h
<P>别设置属性如下: </P>& u( U; S9 N! c. |$ L1 c
<P>database1 aliasname oracle2 </P>
) X1 i# Q4 r5 _, q; g<P> databasename test </P>' s' p7 A( w0 L
<P> connected true </P>( T( k$ u$ L! x# G( R" ?6 X$ q5 [
<P>table1 databasename test </P>$ x m _! n6 l9 e# D; F
<P> tablename kcb </P>
. R1 N# Q. d1 Y* A<P> active true </P>- u' ?3 K8 |+ X
<P>datasetprovider dataset table10 </P>
, D, }) v5 P3 @# A* X, U V<P> expo0rted t rue </P>1 p* W1 d; {2 A5 L3 Y; W, g+ G
<P> 前六行目的是连上后端数据库Oracle2的表KCB,后两行目的是DataSetProvider组件 </P>
0 a0 m4 J$ Y T<P>将表KCB作为DATASET传给前端程序。 </P>
. E* w! b. Q B8 k<P> (3)在Forms1加一个Lable组件,上面写上“服务器应用程序已被启动”,这样运行 </P>
8 |5 [0 y. K8 E L& I) D5 Q<P>时屏幕上就会出现这句话,说明程序已被调用。 </P>; |3 h' v: ]3 i, G/ k
<P> (4)为了前端程序能连上此COM程序,必须把它注册到服务器的注册表内,可通过运 </P>( B3 j/ K1 X0 ~! Q7 [# U
<P>行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。 </P>
) f: V# v/ G# M D( ~<P> 2.前端程序的开发 </P>
' {3 |6 j, t( k) U# V<P> (1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、Dat </P>) t$ t# B, }6 b, b
<P>aSource组件、Dbgrid组件到FORM1上。 </P>, \. L7 J6 b6 u
<P> DCOMConnection1设置如下属性: </P>- H* ~7 m8 l! k) V4 X, u
<P>computername 应用服务器的机器名 </P>: _) u0 }) M& c' u- U6 k; n F
<P>servername project1.kcbb </P>
2 X& g1 d6 T* ^/ v<P> ClientDataSet1设置如下属性: </P># g# U: R; s0 T7 O2 S
<P>remoteserver dcomconnection1 </P>
- J: L) ?5 q1 ^1 K0 W) f' u) h<P>provider table1 </P>
+ I+ N8 y8 u& @4 w. a6 d3 @<P>active true </P>. ?! l. w e% u& q4 N: X
<P> DataSource的DATASET设置为ClientDataSet1; </P>
' n: M" v2 {+ ~$ [: P$ U/ a* R: H3 J<P> Dbgrid的DataSource设置为DataSource1。 </P>0 l: b: t; v' L# Q
<P> (2)拖7个Button来当作功能按钮 ,分别设为新增、修改、删除、取消、写入、重新 </P>+ H/ l7 R3 V9 \5 F- O6 E
<P>读取、返回 。由于BCB提供了ActionList组件,其中包括了StandardAction,可以利用这 </P>
h* f# V. ?" o1 Z) v<P>些标准的Action来编写Dataset的编辑功能, 只要把Button的属性Action依照每Button所 </P>
2 ?& | z8 n3 B' a. l5 {2 \2 q, Y
$ a* N3 V1 k: F& `% {0 f6 A<P>赋予的功能指向对应的ActionList项即可。 </P>
! z( W* A) J$ }5 X& l- Z4 }<P> 最后,将调试好的前端程序复制到所有的前端机中,运行调试,一个Multi_Tier结 </P>
5 u& e* A/ U0 ~ E9 w: C1 L<P>构的数据库应用程序就可投入使用了。 </P>
0 p& ]4 {( W2 H<P> 本文仅仅描述了开发Multi_Tier结构的数据库应用程序的一种基本方法,还需要我 </P>- d9 H8 L2 R" B' V- v6 C6 c( u
<P>们在实际应用中进一步完善,如怎样提高数据在其上的传输效率及数据传输中的出错处 </P>
" C+ R2 b( J' p# T L6 B- I! f$ [& a<P>理等都需要进一步地编程实现 </P> |
zan
|