[讨论]

jsp1988

<>各位前辈好：</P>
<> 我是个垃圾选手，但是我很想做一个3曾数据库的程序，这对于你们来说也许是简单中的简单，但是这是我的短期理想啊 5555555555555555555555555</P>
. N3 G- e, A/ [! M& d. O% `3 q<> 我的QQ是58132234</P>
" R% S/ u; f" n<>我是个好人，希望各位能帮帮小弟    THANK</P>
3 p# V+ f: \' y1 B+ a[em01]

ilikenba

<>以前收集的一个例子！可能对你有用！</P><>1.应用服务器上程序的开发

（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。
# E* Y$ \3 Y# j! y! R, V+ ^1 j
（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别设置属性如下:

database1
aliasname oracle2
databasename test
connected true

table1
; E1 I2 V2 U2 d1 c; O' O7 W0 wdatabasename test
tablename kcb
active true

2 ^& O  z' H. Wdatasetprovider
dataset table10
/ w* V+ T4 Y2 L7 Z: o8 b3 Cexpo0rted true
3 @% a8 N& z( l+ n+ w2 u9 z
前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程序。
8 a  @, A# @/ L# q
; i  B; v9 U. _: U' G. b(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行时屏幕上就会出现这句话，说明程序已被调用。
: L7 G; y8 R5 J" }$ y
(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。

0 y1 u, A% K4 Q  N2 }/ s2.前端程序的开发
4 J7 J$ H  w' `9 K  i8 Y6 c6 r  W
(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。
; |+ Z# W4 B: F) @9 w
3 k- s  G- d% ^# t8 N1 b: n, h1 fDCOMConnection1设置如下属性:
) u  K; v0 E' ~( Y8 j* ]; Ccomputername 应用服务器的机器名
servername project1.kcbb
5 [/ @+ e( ?) l) n2 O
ClientDataSet1设置如下属性:
/ |" i1 `2 n! k' k9 Z2 Y0 `
remoteserver dcomconnection1
provider table1
! R7 D/ g7 d: L  d4 c- Kactive true
4 C- ]/ w. F! L) r
/ E4 F1 }  e7 |* Z( cDataSource的DATASET设置为ClientDataSet1；
7 o* g1 n# t, _& ]) x% vDbgrid的DataSource设置为DataSource1。
* u4 I2 q( j2 o5 _2 q% M
! ~9 C. s1 i, p最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结构的数据库应用程序就可投入使用了。</P>