VB6.0でMicrosoft ActiveX DataObjecs 2.5 Libraryを使っていますが、
Recordsetのイベント
FieldChangeComplete(cFields As Long, Fields, pError As Error, adStatus As EventStatusEnum, pRecordset As Recordset)
や、
MoveComplete(adReason As EventReasonEnum, pError As Error, adStatus As EventStatusEnum, pRecordset As Recordset)
が使えません。「プロシージャの宣言が、イベントまたはプロシージャの定義と一致していません。」というエラーが発生します。
Connectionのイベントは下記のようにすべてつかえるのですが..
Public WithEvents con As ADODB.Connection
Private Sub con_BeginTransComplete(ByVal TransactionLevel As Long, _
ByVal pError As ADODB.Error, _
adStatus As ADODB.EventStatusEnum, _
ByVal pConnection As ADODB.Connection)
MSGBOX "Fire!!!"
End Sub
どなたか、使い方をおしえてもらえないでしょうか?
よろしくおねがいします。
MSADO15.DLLのバージョンと、タイプライブラリのバージョンは一致していますか?
使用中のADOバージョンが、MSADO15.DLLのバージョンよりも低い場合、
それは下位互換モードのタイプライブラリを参照設定して動いている事に
なりますので、互換性のある型を指定するために、インターフェイスの
型名を変更しなければならない場合があります。
[MDAC]INFO: ADO 2.1 は ADO 2.0 のタイプ ライブラリを同梱する
http://support.microsoft.com/kb/201576/ja
[HOWTO] ADO を公開するコンポーネントのバイナリ互換の維持
http://support.microsoft.com/kb/195049/ja
[FIX] ADODC と DataEnvironment のイベントが ADO 2.0 以外で動作しない
http://support.microsoft.com/kb/257714/ja
[ADO] ADODC のイベントでコンパイル エラーが発生する
http://support.microsoft.com/kb/222145/ja
自己解決しました。
Formとかがでてくる左上のコンボボックスでえらぶだけでいいんですね!
丸1日つぶしてしまった...
>魔界の仮面弁士さま、ていねいなレスありがとうございます。
イベントの使い方がよくわっかっていないだけでした。
お手数おかけしてすみませんでした。