[讨论]

jsp1988

<>各位前辈好：</P>
6 S; t, O3 _5 U' W3 J<> 我是个垃圾选手，但是我很想做一个3曾数据库的程序，这对于你们来说也许是简单中的简单，但是这是我的短期理想啊 5555555555555555555555555</P>
<> 我的QQ是58132234</P>
8 T  [, c- X, |* X- n7 G<>我是个好人，希望各位能帮帮小弟    THANK</P>
. L7 }- U0 c/ E0 v) O& [[em01]

ilikenba

<>以前收集的一个例子！可能对你有用！</P><>1.应用服务器上程序的开发
" C% ?3 ?# M4 F2 U- O/ f
' v- \, h) U" ?; E3 t+ k) m& k（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。
7 k/ {. u- l* s+ I1 [  Z  y1 G
（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别设置属性如下:
5 Y7 m8 J# p7 ^8 ~- @3 j& u
database1
aliasname oracle2
$ l9 A9 V4 p3 gdatabasename test
connected true

table1
7 b( I, _- H+ ?databasename test
tablename kcb
active true

* ]& L# @7 ?: [/ b. _datasetprovider
0 d4 ?; \) Z" C# i  c' @8 l" k! J# @dataset table10
3 t2 c3 l& V; Q' f$ l/ Xexpo0rted true

& \! h  t, W( G, @, C( k前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程序。
& G7 _) e% j1 U! a, g; F
$ Z  o7 b: w% @4 G% _(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行时屏幕上就会出现这句话，说明程序已被调用。

& q& M' }% ~/ ~$ ?3 w0 ~; a(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。

; w+ ~  x& Z5 K2.前端程序的开发
  B/ ?5 R. b/ v1 l# n, i& I
(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。
% r! v* H/ C$ a1 T: w% A' P. @4 y
8 J& ^3 v0 P: |7 ]  ~1 WDCOMConnection1设置如下属性:
9 y" D& u7 f+ m" O# s. n( o3 mcomputername 应用服务器的机器名
) t. y& O1 T/ l5 y, j8 ]" ^" Tservername project1.kcbb

3 C) J% w, p5 p5 h# qClientDataSet1设置如下属性:

' Z% i5 R) L4 j6 C9 \; v1 Z5 {+ vremoteserver dcomconnection1
7 R: f3 A' ~9 j( b; k) j& ~provider table1
active true

DataSource的DATASET设置为ClientDataSet1；
Dbgrid的DataSource设置为DataSource1。

最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结构的数据库应用程序就可投入使用了。</P>