Thread View: cn.bbs.comp.program
1 messages
1 total messages
Started by ���ܵ�Сʨ
Sat, 18 Apr 1998 00:00
ʹ��PowerBuilderͬʱ���ʶ����ݿ�
Author: ���ܵ�Сʨ
Date: Sat, 18 Apr 1998 00:00
Date: Sat, 18 Apr 1998 00:00
77 lines
4508 bytes
4508 bytes
PowerBuilder 4.0��һ��ǿ�����ݿ�Ӧ��ϵͳ��������,�������
��Ŀͻ�/��������ϵ�ṹ����������Ӧ�ó��������Լ�����
���Ŀ�������,����Ϊ�������е���ݿ�ǰ�˿������ߡ�
����������������Ϣϵͳ�IJ��Ͽ���,ϵͳ������������ν�
�ֲ��ڲ�ͬ�������ϵ���ݿ�ϵͳ���ɵ�һ������⡣����ͼ��ʾ:
ͼ1
ij���ͻ�Ӧ�ÿ�����Ҫ��ͬһ����ͬʱ���������������ϵ�����
��ͬ����ݿ�,PowerB uilderΪ���������ṩ����������Ľ������
��
����һ:
ͨ��Transaction Objectͬʱ�������,��ͨ���������
ȡ�����ڲ�ͬ��ݿ��ϵ�DataWindows��
������:
ͨ����ݹܵ�(DataPipeLine)��������ݿ��ϻ���е���ݴ���
������ݿ���,����ݹܵ����ɼ��Ϲ�������,�Ա�ֻ������Ҫ�����
��
����ʵ�ַ���
������һ�������ϵ�������ť������ʾ����һ�ͷ�����,�����
������ͼ��ʾ������������е�����¼��ű�(Scripts)����:
(1)�����¼��ű�(Open for W_LC)
Transaction lc_oracle,lc_ingres
�γ�ʼ��oracle��ݿ�����
lc_oracle=CREATE transaction
lc_oracle.DBMS ="OR7 ORACLE v7.x"
lc_oracle.Database ="ora7"
lc_oracle.logId ="Ljb"
lc_oracle.logPassword ="Ljbljb"
lc_oracle.ServerName ="@t:132.147.111.8"
�γ�ʼ��ingres��ݿ�����
lc_ingres=CREATE transaction
lc_ingres.DBMS ="ODBC"
lc_ingres.Database ="xxzx2"
lc_ingres.userid ="nt"
lc_ingres.dbpass ="ingres"
lc_ingres.dbparm ="ConnectString='DSN=kfml;&
SRVR=nt;DB=xxzx2;OPTS=;UID=ingres'"
(2)ͬʱ����������ݿ�Ľű�(Clicked for CB_MutiDBMS)
�η��� oracle��ݿ�
ͼ2
connect using lc_oracle;
dw_oracle.SetTrans(lc_oracle)
dw_oracle.retrieve()
�η���ingres��ݿ�
connect using lc_ingres;
dw_ingres.SetTrans(lc_ingres)
dw_ingres.retrieve()
(3)��ݹܵ��Ľű�(Clicked for CB_PipeLine)
/*˵��һ��֧����ݹܵ��Ķ���,lc_object����
User Object Painter����PipeLine����*/
lc_object lcl_object
��������ݹܵ�
integer start_result
connect using lc_oracle;
connect using lc_ingres;
lcl_object=create lc_object
/*lc_pipeline����PipeLine Painter�ж������ݹܵ�,�Ա㽫
ingres����е���ݴ��͵�oracle��ݿ�����*/
lcl_object.dataobject="lc_pipeline"
start_result=lcl_object.start &(lc_oracle,lc_ingres,dw_o
racle)
If start_result=-3
messagebox("��ݹܵ���","�˻���Ѵ���");
return
end if
disconnect using lc_oracle;
disconnect using lc_ingres;
��
PowerBuilder����ΪӦ��ϵͳ�Ŀ��ٿ����ṩ��ǿ������֧�ֹ�
��,����Ϊ30������ݿ��ṩ��ֱ�����ӻ�ODBC����,�ټ���Transact
ion Object��Data PipeLineͬʱ��ȡ�����ݿ�Ĺ���,Ϊ��������
ҵ����Ϣϵͳ������к������ϵͳ�Ļ����ṩ�˼����Ч�ķ�����
--
[m[1;32m�� ��Դ:���ϴ�С�ٺ���Ϣ����վ bbs.nju.edu.cn��[FROM: hsia.nju.edu.cn][m
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads