Date: Fri, 9 Mar 2001 18:04:46 +0900
From: "Hiromichi Nakagami" <who@sub.example.jp>
> MSDEを使ったシステムをVBでADOを使用して開発しているのですが、
> MSDEに対してアクセスした結果がエラーだった場合のエラー番号やエラー内容（日
本
> 語でのエラー説明）
> （Oracleで言うLastServerErrやLastServerErrTextのようなもの）の取得方法を
> 知っている方がいたら教えていただけないでしょうか？
自己レスです。
OnErrorの処理で、以下のように書いてエラー情報を取得することが出来ました。
Private sub SQLSelect()
Dim pAdoCon as New.ADODB.Connection
Dim adoer as ADODB.Error
On Error Goto VB_Err
****** 処理 *******
Exit Sub
VB_Err:
IF pAdoCon.error.Counts
For Each adoer IN pAdoCon.errors
'ADOエラー
Debug.print "Number";adoer.Number;"Native:":adoer.NativeError
Debug.print "mess:";adoer.Description
Next adoer
Else
'その他のエラー
'ADOエラー
Debug.print "ERR";Err.Number;"mess:";Err.Description
End If
End Sub
ここで、もう一つ疑問が出てきたのですが、adoer.Numberとadoer.NativeError
の違いは何なのでしょうか？質問で聞いた[@@ERROR]はadoer.NativeErrorに
入っている番号と同じでしたが、adoer.Numberの意味が分かりませんでした。
以上
| [MSDE/SQLServerに関して、今、どんなことにお困りですか？] |
| よろしければお困りの内容を、電子メールで教えて下さい。 |
|
質問を電子メールで作成する
|
[ウィンドを閉じる][MSDE/SQLServer FAQ ][MSDE / MSDE2000 技術サポート情報一覧]
|
