[讨论]

jsp1988

<>各位前辈好：</P>
<> 我是个垃圾选手，但是我很想做一个3曾数据库的程序，这对于你们来说也许是简单中的简单，但是这是我的短期理想啊 5555555555555555555555555</P>
<> 我的QQ是58132234</P>
<>我是个好人，希望各位能帮帮小弟    THANK</P>
) B! W: @. u5 [[em01]

ilikenba

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

8 P& @& `4 s- ?( v' J" e（1）打开一个新工程,然后点主功能选单NEW中的RemoteDataModule，并填入Coclass Name项,这里是KCBB。
# }' Q: U6 o7 l" d5 M
" j" H6 M+ Z; i  j& k1 b（2）在RemoteDataModule上放置DATABASE,TABLE,DataSetProvider三个组件,并分别设置属性如下:

database1
aliasname oracle2
2 J* `$ ]+ g/ a4 ^databasename test
' C3 `1 Y% K! m& [0 j2 ^& tconnected true

table1
databasename test
tablename kcb
6 }, n+ b3 S2 c6 H2 eactive true

datasetprovider
) u2 u2 m% F2 A5 Kdataset table10
3 y( y/ d; [5 k0 S0 uexpo0rted true
: t" `' n( l0 w+ E3 i& z
+ k) k! T: z! h6 q2 i1 h# n前六行目的是连上后端数据库Oracle2的表KCB，后两行目的是DataSetProvider组件将表KCB作为DATASET传给前端程序。
, ?( g' n+ x) @1 ~) X: r
, R- U9 I- \- T9 c! I1 a(3)在Forms1加一个Lable组件，上面写上“服务器应用程序已被启动”，这样运行时屏幕上就会出现这句话，说明程序已被调用。
% Y2 d2 j! A+ b" q7 E; I
(4)为了前端程序能连上此COM程序，必须把它注册到服务器的注册表内，可通过运行Regedit.EXE,根据Coclass Name寻找注册名来确认注册是否成功。
8 @8 r( E) H! R
2.前端程序的开发

+ m( K2 G# w8 w* Q8 G8 S2 c; g(1)打开一个新工程,拖拉一个DCOMConnection组件、一个ClientDataSet组件、DataSource组件、Dbgrid组件到FORM1上。

DCOMConnection1设置如下属性:
4 q2 L1 B. o* a+ t" a; H7 Scomputername 应用服务器的机器名
servername project1.kcbb
7 Z4 f, l0 `8 r
ClientDataSet1设置如下属性:

$ e+ ~. }& J& U; \remoteserver dcomconnection1
provider table1
/ z: v) \" W1 Y6 d5 Aactive true
" A1 q% F! p1 C. n1 d
DataSource的DATASET设置为ClientDataSet1；
, B+ X! T" x% H- L& A* _4 WDbgrid的DataSource设置为DataSource1。

& l9 k% k7 K* B- Z  x最后，将调试好的前端程序复制到所有的前端机中，运行调试，一个Multi_Tier结构的数据库应用程序就可投入使用了。</P>