PB同时链接多个数据库
需积分: 50 66 浏览量
2017-10-23
00:40:47
上传
评论
收藏 15KB DOCX 举报
声明多个 Transaction 变量
Transaction SQLCA, SQLCB;
SQLCA = Create
Transaction;
SQLCB = Create
Transaction;
然后做相应配置
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm =
"ConnectString='DSN=********;UID=***;PWD=*******"
SQLCB.DBMS = "ODBC"
SQLCB.AutoCommit = False
SQLCB.DBParm = "ConnectString='DSN=*******;UID=******;PWD=*******'"
使用的时候直接用 Connect Using SQLCA 就可以连接上 SQLCA 所对应的数据库，使用
Connect Using
SQLCB 则可以连接上 SQLCB 所对应的数据库，可以在程序中保持同时和多个数据库的连接，
而不需要在连接使用完后 DISCONNECT，因为频繁的使用 CONNECT 与 DISCONNECT 可
能会导致很多意想不到的问题发生。
要注意的是：当我们在程序中使用 SELECT 等 SQL 语句时，PB 默认的是使用 SQLCA 进行
数据库连接，所以当使用 SELECT 等 SQL 语句的时候，必须在末尾加上 USING
比如：
Select Name
Into: Ls_Name
From
Students
Where Number = :Ls_Number
Using NewTransaction;
评论0
最新资源