补充：用事务对象连接数据库

1、 自学 第16章 程序的调试与发布 CloseQuery事件事件 ODBC数据源配置数据源配置 表的复制：数据管道表的复制：数据管道补充：补充：用事物对象连接数据库用事物对象连接数据库 事务对象事务对象(Transaction Object)(Transaction Object)是一个不是一个不可见的对象，可见的对象，包含了与数据库连接的相关包含了与数据库连接的相关属性参数。属性参数。 应用程序与数据库的连接通过事物对象来应用程序与数据库的连接通过事物对象来完成。完成。 在建立连接前首先给事务对象的相关属性在建立连接前首先给事务对象的相关属性赋值，然后用嵌入式赋值，然后用嵌入式SQLSQL语

2、句语句CONNECTCONNECT建立建立连接连接。1.1.事务对象的属性事务对象的属性 ServerNameStringString型型数据库服务器名称。数据库服务器名称。 DataBaseStringString型型连接的数据库名连接的数据库名 DBMSStringString型型所连接数据库的所连接数据库的PowerBuilderPowerBuilder驱动引擎标示。驱动引擎标示。 DBParmStringString型型连接数据库所需的连接参数，连接数据库所需的连接参数，不同数据库的参不同数据库的参数都不同数都不同 DBPassStringString型型连接数据库的口令连接数据库的口

3、令 UserIDStringString型型连接到数据库的用户名连接到数据库的用户名 LogIDStringString型型数据库服务器登录名数据库服务器登录名 LogPassStringString型型数据库服务器登录口令数据库服务器登录口令 AutoCommitBooleanBoolean型型确定每次执行确定每次执行SQLSQL语句后，是否自动向数据库语句后，是否自动向数据库提交事物请求。提交事物请求。 LockStringString型型事物隔离级别，控制用户访问数据库的方式，事物隔离级别，控制用户访问数据库的方式，如可读、可写。如可读、可写。 SQLCodeLongLong型型数据库操

4、作的返回代码，数据库操作的返回代码，0 0表示成功，表示成功，-1-1表示表示失败，失败，100100表示没有检索到数据。表示没有检索到数据。 SQLDBCodeLongLong型型返回数据库系统定义的错误代码。返回数据库系统定义的错误代码。 SQLErrTextStringString型型返回数据库系统定义的错误信息。返回数据库系统定义的错误信息。 SQLNRowsLongLong型型返回受操作影响的数据行数。返回受操作影响的数据行数。 SQLReturnDataStringString型型返回数据库指定的其他信息返回数据库指定的其他信息2.SQLCA2.SQLCA事务对象事务对象 SQLC

5、A是由应用程序自动创建的一个是由应用程序自动创建的一个全局全局事务对象变量事务对象变量，在应用程序的任何地方都，在应用程序的任何地方都可以访问。可以访问。 一个数据库连接对应一个事务对象。一个数据库连接对应一个事务对象。若同一时刻只连接一个数据库，只使用若同一时刻只连接一个数据库，只使用SQLCASQLCA即可。即可。若同一时刻连接多个数据库，可通过自定义多若同一时刻连接多个数据库，可通过自定义多个个Transaction ObjectTransaction Object来实现。来实现。3.3.Transaction事务管理语句事务管理语句 Connect语句语句连接数据库，可通过连接数据库，

6、可通过SQLCodeSQLCode来判断连接是否来判断连接是否成功。成功。 Disconnect语句语句结束一个成功的连接，自动执行结束一个成功的连接，自动执行CommitCommit语句，语句，以确保当前逻辑工作单元自开始运行以来对数以确保当前逻辑工作单元自开始运行以来对数据库的所有修改得到提交。据库的所有修改得到提交。 Commit语句语句结束逻辑工作单元的执行，确保当前逻辑工作结束逻辑工作单元的执行，确保当前逻辑工作单元自开始运行以来对数据库的所有操作都变单元自开始运行以来对数据库的所有操作都变得长久有效，并且开始一个新的逻辑工作单元。得长久有效，并且开始一个新的逻辑工作单元。 Roll

7、back语句语句结束一个逻辑工作单元，取消逻辑工作单元自结束一个逻辑工作单元，取消逻辑工作单元自开始运行以来对数据库的所有修改，并且启动开始运行以来对数据库的所有修改，并且启动一个新的逻辑工作单元。一个新的逻辑工作单元。事务管理语句的语法格式事务管理语句的语法格式 TransactionOperation USING TransactionObject例如：例如： CONNECT USING SQLCA示例代码：示例代码：SQLCA.DBMS=“ODBC” /设置事务对象属性设置事务对象属性SQLCA.DBParm=“ConnectString=DSN=XSCJ;UID=dba;PWD=sqlCONNECT USING SQLCA; / 与数据库连接与数据库连接IF SQLCA.SQL