[讨论]

jsp1988

<>各位前辈好：</P>
- L5 ?1 n# H# S1 D8 A<> 我是个垃圾选手，但是我很想做一个3曾数据库的程序，这对于你们来说也许是简单中的简单，但是这是我的短期理想啊 5555555555555555555555555</P>
2 y4 {9 u: Q4 Z2 C4 o2 U6 Y<> 我的QQ是58132234</P>
9 m6 ?1 w3 }$ Q# ?+ h8 E& ~<>我是个好人，希望各位能帮帮小弟    THANK</P>
6 v1 E/ ?  p% R5 }) R2 y8 P[em01]

ilikenba

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

+ E0 y+ ?1 s" b! M. t) T2 H& y) r1 q. P（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。

$ W6 ~/ ?3 I6 E; \  @（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别设置属性如下:
8 D) |* @  f- G' o# D4 r
database1
aliasname oracle2
databasename test
connected true
' G8 L$ I2 A3 A. `5 C2 p# O& Q/ V3 V
) H! C& W1 ]6 N, F" o% ptable1
databasename test
5 R+ [3 `! L" q5 A, ^& N8 d/ qtablename kcb
active true
8 a1 c# ^' y  p* _
datasetprovider
dataset table10
7 S, `5 _; {; Gexpo0rted true
8 G* i8 q5 @7 R9 v$ u
6 l/ Z3 s) m8 p1 ]9 e& p前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程序。

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

(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。

: Q/ d$ |6 X! d$ {, Q+ c) k  I- `2.前端程序的开发

(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。
( n1 C) r% n  u, e" p
5 z: Q9 s  n- a+ ?' M8 w+ c6 kDCOMConnection1设置如下属性:
computername 应用服务器的机器名
servername project1.kcbb

ClientDataSet1设置如下属性:
! C! _- L0 \6 r( |( c4 \
remoteserver dcomconnection1
6 N/ x0 M' ]6 Qprovider table1
5 `9 Z& l& m( j% N( [, v: ~7 G$ R6 |active true

DataSource的DATASET设置为ClientDataSet1；
Dbgrid的DataSource设置为DataSource1。
' E+ D  I% K6 U# O2 s0 \; h
. t0 h/ F! ?4 @: z. {. M最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结构的数据库应用程序就可投入使用了。</P>