VBからoo4oを使用してOracleに接続する



Private Sub Command1_Click()
 'ORACLEセッションオブジェクト
 Dim oraSess As Object

 'ORACLEDBオブジェクト
 Dim oraDB As Object
 'セッションを確立
 Set oraSess = CreateObject("OracleInProcServer.XOraSession")
 'DBを開く
 Set oraDB = oraSess.DbCreateDatabase(DB名,ユーザー名/パスワード,オプション)
 オプション定数の宣言についてはoo4oがインストールされているフォルダ内のOraconst.txt内に記述されている。



Tips集へ戻る