数学建模社区-数学中国

标题: 用BCB开发多层数据库应用程序 [打印本页]
作者: 韩冰    时间: 2005-1-26 12:36
标题: 用BCB开发多层数据库应用程序
<>邓未玲　2000-11-16 16:27:11 </P>' a1 v+ y; Y# ~: ~
<>　　继Client/Server结构在MRP、MIS等数据库应用系统红火之后，多层结构（Multi_T </P>  Q, x; t# q% ]5 R7 [% z) O
<>ier）开始登场，许多厂商提供了各种中间件。本文描述了用Borland C++ Builder（以 </P>
' c# o  V9 O& n/ E4 h+ v<>下简称BCB）所提供的Multi_Tier构件来开发多层数据库应用程序的方法。 </P>
( k6 r! S# \7 P% E- @! M<>　　一、 Multi_Tier结构的实现 </P>3 q- u* R1 n; k4 l  n# J5 L- c
<>　　C++ Builder提出的Multi_Tier是把以前的Client/Server前端应用程序里的BDE、S </P>- [: k# R; _/ z/ e& [, W3 @
<>QL Link和DataModule拿到另一台NT服务器上，也叫应用程序服务器，前端机只留下应用 </P>8 S- v2 t3 U# w& N( m) |" a
<>程序及DBClient.DLL,而移到应用程序服务器上的DataModule则变成一个COM程序,此COM </P># F& |9 B- ?/ W# y5 C8 @5 w
<>程序是通过BDE 、SQL Link传输SQL到后端数据库,并从后端数据库存取数据，然后由Td </P>
+ L3 R- o/ q3 f  g' [7 {) N<>atasetprovider组件把读取的Dataset压缩并切割成一段一段的数据包（data packet） </P>2 _+ w& N/ t, x& Z% W
<>通过DCOM的机制传给前端机，前端机上的DBClient.DLL会把接收到的数据包再还原成Da </P>2 a0 E$ Q0 O6 s2 w; r7 H/ q6 @
<>taSet传给程序中的TclientDataSet组件,Data Control组件就可以TclientDataSet为数 </P>8 y# d  E' ?# J0 M& q& W/ o& r
<>据源对之进行操作，而COM程序会把修改后的DataSet正确地写回后端数据库。 </P>
' a) A9 l( B$ D; {% v" n<>　　与Client/Server结构相比，Multi_Tier结构具有很多优点，主要表现在： </P>
, f: E% a) D: X/ T5 w+ G<>　　1. 大幅度地减少数据库服务器的负担。因为多了一层应用程序服务器，接管了众多 </P>
6 `0 u6 k2 m  @" _, M) U' _9 g<>客户机的Connection处理，数据库服务器只需处理应用服务器的Connection，这样就不 </P>
- n  d1 A, @7 H0 [/ f* o$ n<>会因为用户（Client）数的增加而影响系统的运行性能。 </P>2 s' Z8 }% ]: w# i1 p* H8 S: v
<>　　2. 前端机应用程序安装方便。Multi_Tier结构中，把以前的Client/Server前端应 </P>
% C6 `; [) t! L7 u$ A<>用程序内的BDE、SQL Link和DataModule拿到数量很少的应用服务器上，前端机只负责U </P>
" b6 X( q- F6 p# J6 j( x<>se Interface的处理，只需要一个单纯的EXE文件（包括DBClient.DLL）,可以在应用服 </P>" {/ R# {0 L1 E: z
<>务器上开发前端应用程序,通过网络复制到各个前端机上。 </P>
9 x6 P# b7 B, z9 Y<>　　二、 环境配置 </P>
0 B1 T, U. j6 L8 X0 |<>　　1.后端数据库服务器配置 </P>4 O0 z5 X$ `: m7 W9 e+ |! p
<>　　包括数据库系统及数据库提供的中间件。本文具体环境为： </P>& |7 c  R9 K* f
<>　　VMS操作系统上安装Oracle7.3。 </P>- Q9 o8 ?4 M7 O
<>　　2.应用程序服务器配置 </P>
, q/ c0 l4 d2 b& w<>　　（1）在PC Server上安装Windows NT ，使它成为一台Microsoft NT Server； </P>9 E" ~& ?% R. `2 H2 w3 k
<>　　（2）保证网络的畅通,即网络层的通讯协议的畅通； </P>: \. z$ V. i$ ], H
<>　　（3）安装数据库系统提供的中间件,本文是Oracle提供的Oracle for NT 的SQL？N </P>
3 k, q) R8 f2 o6 t6 `<>ET产品,执行SQL？NET Easy Configuration工具,设定Oracle的TNS连接参数,加入一个数 </P>; c# ^0 N3 |0 `' O$ J; Q
<P>据库别名,连上后端的Oracle数据库服务器； 5 [* |% Y7 O! p( _
　　（4）安装BDE Administrator，设定BDE的参数内容，具体步骤如下： </P>
( _2 h9 g$ Q2 Y+ c! W3 r<P>　　Databases中先新建一个别名，本文是Oracle2，其中的参数改为： </P>& G0 e5 y6 D; D, ?& @4 L
<P>server name 　　数据库服务器的别名 </P>2 j$ |3 ~' F' n7 d) s2 l
<P>net protocol 　　tns </P>4 @8 `4 [7 S$ _0 [$ @
<P>user name 　　　oracle的用户名/口令 </P>. v% O3 U4 Z. M' |6 J) [- e# @
<P>　　（5）安装C++Builder 5软件,用于开发应用服务器和客户端的程序。 </P>& a, f4 i+ X9 e  H& g% W
<P>　　3.前端客户机配置 </P>
' D# g7 W1 N6 V<P>　　（1）安装操作系统Windows 95/98,本文是Windows 98，保证各前端机与应用服务器 </P>; M& y: H" V* z8 L  Y
<P>在TCP/IP层上连通； </P>
6 d2 n5 G4 s: M+ V0 R2 Q0 S<P>　　（2）从NT服务器的WinntSystem32目录下复制DBClient.DLL到本机的WindowsSyste </P>
% _2 P: }* u) c" N' P" |! B, k<P>m； </P>! O2 F  V- i9 P3 m9 Y+ H
<P>　　（3）如操作系统为Windows 95,必须安装DCOM程序,因为Windows 98 与Windows NT </P>; F* J+ b2 A4 c. Q0 U
<P> Workstation已经内含DCOM程序,不需另外安装； </P>
. N2 I2 Z/ u  _0 V<P>　　（4）在应用服务器上开发应用程序，通过网络复制。 </P>+ @* t4 E% }* d/ U1 B) \9 p
<P>　　三、实现步骤 </P>
& ~* t8 }; N" k2 ?0 i/ H: j: y8 o<P>　　下面是一个对材料库存表进行维护的Multi_Tier结构数据库管理程序，用户可以在 </P>
1 k1 j6 y0 H% @+ G<P>前端的Windows 98机上通过中间的NT应用服务器对Alpha机上的Oracle数据库上的库存表 </P>& A+ N3 c) |. q; p8 m$ i6 m
<P>进行维护。 </P>
" _% R: T, J* o' |<P>　　1.应用服务器上程序的开发 </P>! @( `- s6 r# G8 Z9 C
<P>　　（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Cocla </P>9 K4 m+ V+ h2 W) O
<P>ss Name项,这里是KCBB。 </P>
# D: x$ x8 a$ W<P>　　（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分 </P>- Y2 K& [. K% u2 r- f
<P>别设置属性如下: </P>! J/ l5 w" n! h9 L* {, W; T* z" S4 E
<P>database1 aliasname 　　oracle2 </P>8 F0 n: z9 Q# y1 M2 c/ `  c
<P>　　　　　databasename 　test </P>
( m( c) X* f! ]3 R4 |2 M  }<P>　　　　　connected　　　 true </P>
; s4 t& o! d/ |+ p2 k0 g; k4 K" s  C5 q<P>table1 databasename 　　test </P>
% s  V5 w  b/ `, R; I3 g<P>　　　　tablename 　　　kcb </P>3 m, ]: j- |) U9 W& c
<P>　　　　active 　　　　true </P>+ Z- ^. l6 E/ W7 ]9 {
<P>datasetprovider 　dataset 　table10 </P>' m% M: ]! m& z- W/ \% s( D8 R4 t
<P>　　　　　　　　　expo0rted t　rue </P>8 ~2 X6 A+ @+ X3 L* U& n! P' ^# U
<P>　　前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件 </P>0 w6 L' |: Z$ s; b6 J9 p5 y7 b
<P>将表KCB作为DATASET传给前端程序。 </P>
3 A# @9 U, c* a, {6 e9 Y<P>　　(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行 </P>
) g. ^2 @- B/ T3 a! p6 C<P>时屏幕上就会出现这句话，说明程序已被调用。 </P>
) t; t* ]8 a# Q* z+ @<P>　　(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运 </P>& `( }% `4 t3 \
<P>行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。 </P>
! g4 C# r( d& Y" V: a8 [<P>　　2.前端程序的开发 </P>* V- E$ X' Y! B4 V+ e8 Y1 ~
<P>　　(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、Dat </P>1 k) \6 A# ^  ]6 Q
<P>aSource组件、Dbgrid组件到FORM1上。 </P>
0 R% x. v1 K9 U; `. w3 i5 n<P>　　DCOMConnection1设置如下属性: </P>- q5 h$ A/ ]) E
<P>computername 应用服务器的机器名 </P>
. k4 C8 B. m9 M<P>servername　　 project1.kcbb </P>
/ T, ^* ]7 f! O4 b) `: Q% ]8 G- v<P>　　ClientDataSet1设置如下属性: </P>& X8 I  W4 ]" F' _2 H/ Z8 B+ ^8 E
<P>remoteserver dcomconnection1 </P>
: g8 f0 |9 D- n$ @/ h<P>provider　　 table1 </P>( A% K4 M. |! o- y
<P>active 　　　　true </P>1 B4 [( g6 {. y
<P>　　DataSource的DATASET设置为ClientDataSet1； </P>
" U7 R: s! ]7 q<P>　　Dbgrid的DataSource设置为DataSource1。 </P>
# T" A' J- m5 m8 S) h8 V! t<P>　　(2)拖7个Button来当作功能按钮 ，分别设为新增、修改、删除、取消、写入、重新 </P>; P% y2 W+ k4 D: A
<P>读取、返回 。由于BCB提供了ActionList组件,其中包括了StandardAction,可以利用这 </P>2 W! Z' `+ R# G
<P>些标准的Action来编写Dataset的编辑功能, 只要把Button的属性Action依照每Button所 </P>( E1 P- g! U. H6 k$ g( n
7 U" K6 P% r4 d/ P+ F0 r, T* |. y
<P>赋予的功能指向对应的ActionList项即可。 </P>
6 K% t) W1 ~, s<P>　　最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结 </P>
# G3 \% d. ^/ r3 N: d. t<P>构的数据库应用程序就可投入使用了。 </P>
8 F1 U; ~$ C" k' f: Y% P<P>　　本文仅仅描述了开发Multi_Tier结构的数据库应用程序的一种基本方法，还需要我 </P>
) g1 G5 @+ M" i2 j. J7 q8 A; U<P>们在实际应用中进一步完善，如怎样提高数据在其上的传输效率及数据传输中的出错处 </P>
: I) G- S  ?+ {6 }: `<P>理等都需要进一步地编程实现 </P>



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