[讨论]

jsp1988

<>各位前辈好：</P>
<> 我是个垃圾选手，但是我很想做一个3曾数据库的程序，这对于你们来说也许是简单中的简单，但是这是我的短期理想啊 5555555555555555555555555</P>
3 ?6 |/ g; u4 L# X<> 我的QQ是58132234</P>
- m& _# \; F# k: t4 K3 \<>我是个好人，希望各位能帮帮小弟    THANK</P>
[em01]

ilikenba

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

（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。
: [8 t5 h. N# ~3 m5 A
（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别设置属性如下:

database1
2 k- f6 ^0 G) w4 V- Zaliasname oracle2
) A$ W$ h4 @/ z9 U( V9 vdatabasename test
7 m) S2 s) P8 cconnected true
% e9 o7 l1 X/ n' W# G8 e8 k5 P' ?1 K2 e
table1
databasename test
tablename kcb
; D& N! r7 l- H7 a. |" Oactive true

. i& B* D  n* h, `( u( ~( V  fdatasetprovider
dataset table10
expo0rted true
/ d7 O4 i. t! e
+ e: r; b2 M2 K前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程序。

(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行时屏幕上就会出现这句话，说明程序已被调用。

(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。
1 t/ g+ u# O# V+ `8 b* O
2.前端程序的开发

8 ~6 i6 r! K/ \7 A(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。

DCOMConnection1设置如下属性:
computername 应用服务器的机器名
. i5 L8 z5 K% s' m' Jservername project1.kcbb
$ D3 r; }: u: a0 E# s' E$ _
: c. b1 J! v& T9 @/ ]ClientDataSet1设置如下属性:
/ W8 v2 Y* w2 K& M* t% R& A
( K6 ^2 p! ~9 b% cremoteserver dcomconnection1
1 F8 O& h. E6 |# M7 }& iprovider table1
active true
  C* [2 D# u9 d; C, @
4 f7 a, S0 |) ~! F+ o4 \$ C/ g% _+ CDataSource的DATASET设置为ClientDataSet1；
Dbgrid的DataSource设置为DataSource1。
" S. q& M$ j/ `3 C' U4 C+ S
最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结构的数据库应用程序就可投入使用了。</P>