Recordset2.Transactions プロパティ (DAO)

  • [アーティクル]

適用先: Access 2013、Office 2013

オブジェクトがトランザクションをサポートしているかどうかを示す値を取得します。 読み取り専用の Boolean です。

構文

式 。トランザクション

式Recordset2 オブジェクトを表す変数。

注釈

Microsoft Access ワークスペースでは、ダイナセット タイプまたはテーブル タイプの Recordset オブジェクトでも Transactions プロパティを使用できます。 Snapshot-and forward-only-type Recordset オブジェクトは常に False を返します。

ダイナセット タイプまたはテーブル タイプの Recordset が Microsoft Access データベース エンジン テーブルに基づいている場合、 Transactions プロパティは True となるため、トランザクションを使用できます。 他のデータベース エンジンでは、トランザクションがサポートされていないことがあります。 たとえば、Paradox テーブルに基づくダイナセット タイプの Recordset オブジェクトでは、トランザクションを使用できません。

Recordset オブジェクトの Workspace オブジェクトで BeginTrans メソッドを使用する前に、 Transactions プロパティでトランザクションがサポートされているかどうかを確認してください。 トランザクションがサポートされていないオブジェクト上で BeginTrans、 CommitTrans、または Rollback の各メソッドを使用しても、何も変化しません。

例

次の例では、Microsoft Access ワークスペースでの Transactions プロパティの機能を示します。

Sub TransactionsX() 
 
 Dim wrkAcc As Workspace 
 Dim dbsNorthwind As Database 
 Dim conPubs As Connection 
 Dim rstTemp As Recordset 
 
 Set wrkAcc = CreateWorkspace("", "admin", "", dbUseJet) 
 Set dbsNorthwind = wrkAcc.OpenDatabase("Northwind.mdb") 
 
 ' Open two different Recordset objects and display the 
 ' Transactions property of each. 
 
 Debug.Print "Opening Microsoft Access table-type " & _ 
 "recordset..." 
 Set rstTemp = dbsNorthwind.OpenRecordset( _ 
 "Employees", dbOpenTable) 
 Debug.Print " Transactions = " & rstTemp.Transactions 
 
 Debug.Print "Opening forward-only-type " & _ 
 "recordset where the source is an SQL statement..." 
 Set rstTemp = dbsNorthwind.OpenRecordset( _ 
 "SELECT * FROM Employees", dbOpenForwardOnly) 
 Debug.Print " Transactions = " & rstTemp.Transactions 
 
 rstTemp.Close 
 dbsNorthwind.Close 
 conPubs.Close 
 wrkAcc.Close 
End Sub