[讨论]

jsp1988

<>各位前辈好：</P>
9 f% ?6 @/ T- p9 ~0 K# u5 y<> 我是个垃圾选手，但是我很想做一个3曾数据库的程序，这对于你们来说也许是简单中的简单，但是这是我的短期理想啊 5555555555555555555555555</P>
<> 我的QQ是58132234</P>
3 a6 u( r3 E; z/ ^" g% _( a9 l" H<>我是个好人，希望各位能帮帮小弟    THANK</P>
[em01]

ilikenba

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

（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。

（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别设置属性如下:
6 k5 a4 h- Y, s9 U  D- ~
database1
# q: E  k" k1 O' a  A  saliasname oracle2
( S) M# ~: }" G$ ^4 ^databasename test
connected true
1 i) G4 N7 |( f
) t4 }1 M3 j$ V) b& Ctable1
databasename test
tablename kcb
1 \) Q/ N: Z. h. [% S5 F: L+ iactive true

datasetprovider
dataset table10
expo0rted true

" z% j; G) H: w前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程序。
: l' l$ D1 `# c! _
(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行时屏幕上就会出现这句话，说明程序已被调用。

(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。
  W8 {& U( r; d, E( k+ ~, ^5 r! ~
2.前端程序的开发
$ J0 m! B; V3 a1 ?
; j2 w! M3 [7 N(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。

. _) h; L, P* D0 w2 E" zDCOMConnection1设置如下属性:
! z1 g  ?& y/ i' R$ lcomputername 应用服务器的机器名
4 v. U4 h! w% h: ~4 I) tservername project1.kcbb

# E0 p7 d3 s0 NClientDataSet1设置如下属性:

remoteserver dcomconnection1
  h4 I! s6 g0 g* D) ~+ pprovider table1
active true

, W1 A* r# s$ b* vDataSource的DATASET设置为ClientDataSet1；
Dbgrid的DataSource设置为DataSource1。

8 k7 I% f, d; `9 I+ g最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结构的数据库应用程序就可投入使用了。</P>