VB2005 OracleのODPエラーメッセージ取得

解決

かお 2008-01-10 23:55:38 No: 144252

VB2005 OracleのODPをを使用しています。
ExecuteNonQuery()実行時の
Oracleのエラーメッセージを取得する方法を教えてください。

Public sub xxx()

On Error GoTo ERRORX

  conn.Open()

  cmd.CommandText = "UPDATE M商品 SET 価格=100 WHERE 商品CD=1"

  Dim rows As Decimal = cmd.ExecuteNonQuery()

  conn.Close()

ERRORX:
  MsgBox("xxx")    ←●SQL文が構文エラーの時Oracleが表示するメッセージを取得して表示したい

End sub

もげ 2008-01-11 00:02:21 No: 144253

OracleExceptionクラス
について調べてみてください。
http://otndnld.oracle.co.jp/document/products/oracle10g/101/doc_v12/win.101/B15519-01/OracleExceptionClass.htm

> On Error GoTo ERRORX
.NETなのですから、Try〜Catchを推奨します。

かお 2008-01-11 00:30:44 No: 144254

もげ様

できました。ありがとうございました。