数学建模社区-数学中国

标题: 用BCB开发多层数据库应用程序 [打印本页]
作者: 韩冰    时间: 2005-1-26 12:36
标题: 用BCB开发多层数据库应用程序
<>邓未玲　2000-11-16 16:27:11 </P>
% Y$ k$ B# n6 c! r# ]! z<>　　继Client/Server结构在MRP、MIS等数据库应用系统红火之后，多层结构（Multi_T </P>0 w# q1 A3 I0 D! {  v8 i4 ~
<>ier）开始登场，许多厂商提供了各种中间件。本文描述了用Borland C++ Builder（以 </P>. k: c3 ^. }+ O) q+ p( a% ^. c
<>下简称BCB）所提供的Multi_Tier构件来开发多层数据库应用程序的方法。 </P>6 o1 G& K4 `9 o- x$ |' I1 k  U) |  Z
<>　　一、 Multi_Tier结构的实现 </P>
, ]! u* Q% \# k: B7 U7 y) T% r<>　　C++ Builder提出的Multi_Tier是把以前的Client/Server前端应用程序里的BDE、S </P>
* H2 `/ \4 d" c' }- |2 H- m<>QL Link和DataModule拿到另一台NT服务器上，也叫应用程序服务器，前端机只留下应用 </P>4 Q- g9 N4 R  k( f0 X
<>程序及DBClient.DLL,而移到应用程序服务器上的DataModule则变成一个COM程序,此COM </P># @  Y; @' z7 A0 R
<>程序是通过BDE 、SQL Link传输SQL到后端数据库,并从后端数据库存取数据，然后由Td </P>, ~( N, |4 p! f( B) \
<>atasetprovider组件把读取的Dataset压缩并切割成一段一段的数据包（data packet） </P>9 d" |3 l& s& w: h4 Q+ Y
<>通过DCOM的机制传给前端机，前端机上的DBClient.DLL会把接收到的数据包再还原成Da </P>4 K( ~3 V. Y( @
<>taSet传给程序中的TclientDataSet组件,Data Control组件就可以TclientDataSet为数 </P>
# h4 Q, z/ A0 _' r8 |' w; O' N<>据源对之进行操作，而COM程序会把修改后的DataSet正确地写回后端数据库。 </P>
( N1 H* E1 q9 f3 y* W7 C<>　　与Client/Server结构相比，Multi_Tier结构具有很多优点，主要表现在： </P>; ^6 i' g# s/ n  Z
<>　　1. 大幅度地减少数据库服务器的负担。因为多了一层应用程序服务器，接管了众多 </P>. |: ]9 U8 G5 W0 a# q1 Z: \9 P+ \2 b
<>客户机的Connection处理，数据库服务器只需处理应用服务器的Connection，这样就不 </P>
4 M* x+ `9 [! S<>会因为用户（Client）数的增加而影响系统的运行性能。 </P>- T" q7 F+ C) N5 a- R, s) I3 Y! e' r
<>　　2. 前端机应用程序安装方便。Multi_Tier结构中，把以前的Client/Server前端应 </P>
3 e4 J  x/ `6 ^' u. G, a+ T<>用程序内的BDE、SQL Link和DataModule拿到数量很少的应用服务器上，前端机只负责U </P>
/ b4 m: w& _/ i<>se Interface的处理，只需要一个单纯的EXE文件（包括DBClient.DLL）,可以在应用服 </P>$ c- `# T0 w# r6 w! I8 y
<>务器上开发前端应用程序,通过网络复制到各个前端机上。 </P>
  R5 b  Q. f# q- [" c: e  W6 e<>　　二、 环境配置 </P>- w  D) R" G+ f3 j
<>　　1.后端数据库服务器配置 </P>0 m* ?! \, b6 u$ z+ o. T+ w
<>　　包括数据库系统及数据库提供的中间件。本文具体环境为： </P>9 B$ x( `+ \+ f4 h$ j+ h- Q& N
<>　　VMS操作系统上安装Oracle7.3。 </P>6 N& f3 e' p5 c& }/ O9 A3 s
<>　　2.应用程序服务器配置 </P>! [5 P% e" u" f
<>　　（1）在PC Server上安装Windows NT ，使它成为一台Microsoft NT Server； </P>( N/ x% n+ v0 _" a6 U
<>　　（2）保证网络的畅通,即网络层的通讯协议的畅通； </P># ]9 X+ j5 G$ Y
<>　　（3）安装数据库系统提供的中间件,本文是Oracle提供的Oracle for NT 的SQL？N </P>7 C) {+ q3 u/ c6 w
<>ET产品,执行SQL？NET Easy Configuration工具,设定Oracle的TNS连接参数,加入一个数 </P>
4 f' H+ j4 Z5 \7 E" V( C3 u; I/ _<P>据库别名,连上后端的Oracle数据库服务器；
4 n6 |' c" ~& D　　（4）安装BDE Administrator，设定BDE的参数内容，具体步骤如下： </P>
) O( L% T! r; v6 e' M3 U! n, f) ]<P>　　Databases中先新建一个别名，本文是Oracle2，其中的参数改为： </P>
! G; E" m% S9 I( v! l; d<P>server name 　　数据库服务器的别名 </P>
  j; ?! m0 I* z) b; Y) I* s<P>net protocol 　　tns </P>
; f% o0 J# G; Z" x5 w9 d7 T! b; J<P>user name 　　　oracle的用户名/口令 </P>
4 T9 x6 Y( i1 T# `& X2 J<P>　　（5）安装C++Builder 5软件,用于开发应用服务器和客户端的程序。 </P>
3 c* q; H- ^4 ?1 ^<P>　　3.前端客户机配置 </P>
( ?' q( c$ _2 a. r9 J<P>　　（1）安装操作系统Windows 95/98,本文是Windows 98，保证各前端机与应用服务器 </P>
% G  k1 [8 `! T# y* D/ l& n% j<P>在TCP/IP层上连通； </P># J0 T5 J. [- ~: }0 _# t
<P>　　（2）从NT服务器的WinntSystem32目录下复制DBClient.DLL到本机的WindowsSyste </P>
) b( l0 i9 z9 e5 {<P>m； </P>
* A( W( Z* \) F; Q3 I3 x<P>　　（3）如操作系统为Windows 95,必须安装DCOM程序,因为Windows 98 与Windows NT </P>
4 X" |+ M" b0 h* E4 P  K<P> Workstation已经内含DCOM程序,不需另外安装； </P># m9 J4 v8 i9 C( K) ?  f; g$ ?
<P>　　（4）在应用服务器上开发应用程序，通过网络复制。 </P>/ `: s0 _! j( U, }2 k$ Z+ l9 B7 C
<P>　　三、实现步骤 </P>
1 m3 K7 _4 o( G3 i# h8 N<P>　　下面是一个对材料库存表进行维护的Multi_Tier结构数据库管理程序，用户可以在 </P>& i% Y5 y" r: B  N4 R
<P>前端的Windows 98机上通过中间的NT应用服务器对Alpha机上的Oracle数据库上的库存表 </P>3 P: l: X' N" U1 D; w7 d
<P>进行维护。 </P>
- W/ b, t. ~4 {; l8 u& J9 s* j<P>　　1.应用服务器上程序的开发 </P># w7 F- w* \4 Q3 }
<P>　　（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Cocla </P>
& F# W. M$ T) I2 H8 R: r- t. q: {0 U<P>ss Name项,这里是KCBB。 </P>9 m2 f; I9 }# P+ K" E
<P>　　（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分 </P>% p) z5 V/ n  E; }
<P>别设置属性如下: </P>
' K1 \6 b+ e: C7 C<P>database1 aliasname 　　oracle2 </P>
7 `! B' w" j$ p% e0 I- @3 W( M<P>　　　　　databasename 　test </P>' H3 q% |: N+ h. ?- g  B' p
<P>　　　　　connected　　　 true </P>- G% u$ w6 Z4 E! Q2 D
<P>table1 databasename 　　test </P>: w6 j9 a0 g# E) @* {  G
<P>　　　　tablename 　　　kcb </P>
  A4 @7 b( v  J  t, N$ M8 L<P>　　　　active 　　　　true </P>
  ?( i6 G1 e( [5 [' _' c. _; P<P>datasetprovider 　dataset 　table10 </P>
5 p4 W5 s/ h5 a2 X8 r' X/ H' |<P>　　　　　　　　　expo0rted t　rue </P>/ H' O& f$ `3 K" i5 S7 [
<P>　　前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件 </P>
5 c" b. i: B' r6 I<P>将表KCB作为DATASET传给前端程序。 </P>
9 {4 o2 e. ^. F! W& q) c<P>　　(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行 </P>
  f' q4 Y9 m+ ~/ ?; `; `<P>时屏幕上就会出现这句话，说明程序已被调用。 </P>
. B# k6 p" k4 G# ~<P>　　(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运 </P>* @# a4 {- [3 d4 u0 ~
<P>行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。 </P>
. T0 y: A" r* p% |5 P1 u<P>　　2.前端程序的开发 </P>5 M( H) ]* _4 @" g2 i
<P>　　(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、Dat </P>* T( B& U  r) |0 k3 d- ]
<P>aSource组件、Dbgrid组件到FORM1上。 </P>
  G1 }2 m+ I" Q2 u2 S  ^<P>　　DCOMConnection1设置如下属性: </P>3 V" M: d- o" U6 W2 k7 }$ M3 q! U
<P>computername 应用服务器的机器名 </P>
8 J  P7 l3 S1 z% M$ B; A$ A<P>servername　　 project1.kcbb </P>
, }* k  ?- y$ ?- u/ l<P>　　ClientDataSet1设置如下属性: </P>+ z' ~) S; t( h- r, c
<P>remoteserver dcomconnection1 </P>
- \! s5 n" |2 Q7 V<P>provider　　 table1 </P>0 [3 b6 x4 u0 b5 Z% ^
<P>active 　　　　true </P>
: t/ F9 ~' B! D% q<P>　　DataSource的DATASET设置为ClientDataSet1； </P>1 e- ~( h: \, x; [) ^
<P>　　Dbgrid的DataSource设置为DataSource1。 </P>! Z7 p# R" f2 z  D4 o7 F
<P>　　(2)拖7个Button来当作功能按钮 ，分别设为新增、修改、删除、取消、写入、重新 </P>
/ y; U6 P: H- I6 |2 |1 j<P>读取、返回 。由于BCB提供了ActionList组件,其中包括了StandardAction,可以利用这 </P>
+ Z3 [% t# e& v; r; \4 t+ Q* s<P>些标准的Action来编写Dataset的编辑功能, 只要把Button的属性Action依照每Button所 </P>; d' E' l3 c+ q
" L& N3 ?: f$ a9 ]
<P>赋予的功能指向对应的ActionList项即可。 </P>
- b- @3 I' j# G8 G* N8 ?<P>　　最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结 </P>1 C1 `$ W% q& @% m
<P>构的数据库应用程序就可投入使用了。 </P>
- E2 U; v) ~% N+ z: h5 ~% Q1 O# a<P>　　本文仅仅描述了开发Multi_Tier结构的数据库应用程序的一种基本方法，还需要我 </P>3 U6 K- l7 c6 O% o" [( M. X2 o
<P>们在实际应用中进一步完善，如怎样提高数据在其上的传输效率及数据传输中的出错处 </P>8 S! G( q7 b3 {; h( ~
<P>理等都需要进一步地编程实现 </P>



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