oo4o - Oracleエラー(SQLコード)を取得するAdvertisementOracleエラーOracleエラーの補足
oo4oでOracleエラーを補足するには、OraDatabaseオブジェクトのLastServerErr、LastServerErrTextメソッドを参照します。
サンプル
Private Sub CommandButton1_Click()
Dim OraSession As Object
Dim OraDatabase As Object
Dim OraDynaset As Object
On Error Resume Next
OraSession = CreateObject("OracleInProcServer.XOraSession")
OraDatabase = OraSession.OpenDatabase("sampledb", "scott/tiger", 0)
OraDynaset = OraDatabase.CreateDynaset("select * from XXXXX", 0)
Console.WriteLine(OraDatabase.LastServerErr())
Console.WriteLine(OraDatabase.LastServerErrText())
End Sub
結果 942 ORA-00942: table or view does not exist Advertisement |
ショートカット・634・634ブログ ・このカテゴリのトップページに戻る ・Incubator(Pukiwiki) ・634ラボ UIコレクションギャラリー ZO-3ジェネレーター サイト検索Y!ログール |