数据库操作

Oracle

Dim  aDS  As  OraDynaset
Set  aDS  =  OraDB.DbCreateDynaset(aSql, ORADYN_READONLY  +  ORADYN_NOCACHE)
Set  aDS  =  OraDB.DbCreateDynaset(aSql, ORADYN_READONLY)
OraDB.ExecuteSQL (aSql)

 

参照設定：

Oracle Data Control
Oracle InProc Server 5.0 Type Library

ADO

Dim  aRs  As  ADODB.Recordset
Set  aRs  =   New  ADODB.Recordset
aRs.Open aSql, adServerCN, adOpenDynamic
adServerCN.Execute (aSql)
Set  aRs  =   New  ADODB.Recordset
aRs.Open aSql, adServerCN, adOpenKeyset, adLockOptimistic
Set  aRs  =   New  ADODB.Recordset
aRs.Open aSql, adServerCN, adOpenStatic, adLockReadOnly

 
参照設定：
Microsoft ActiveX Data Object 2.7 Library

DAO

Public  WS         As  Workspace
WS.BeginTrans
WS.CommitTrans
WS.Rollback
Dim  aRS  As  Recordset
Db.Execute aSQL

参照設定：

Microsoft DAO 3.51 Object Library

Microsoft DAO 3.60 Object Library