ADO Event InfoMessage

[Carl]

Can someone please tell me why I get the following error when I try to
compile this.

Private sub adocon_InfoMessage(pError As ADODB.Error, adStatus As
ADODB.EventStatusEnum, pConnection As ADODB.Connection)
'code to print error messages

end sub

Compile Error:
Procedure Declaration does not match description of event or procedure
having the same name.

I am using VB6 and ADO 2.7
I copied the declaration directly from the object browser. i just added the
explicit declarations ( adodb.)

Thank You,

Carl

[Steve Gerrard]

I think you just need the ByVal keywords. This is how mine comes up by itself:

Connection1_InfoMessage(ByVal pError As ADODB.Error, adStatus As
ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)

"Carl" <ca*****@yahoo.com> wrote in message
news:_lcdb.2565$La.1820@fed1read02...

Can someone please tell me why I get the following error when I try to
compile this.

Private sub adocon_InfoMessage(pError As ADODB.Error, adStatus As
ADODB.EventStatusEnum, pConnection As ADODB.Connection)
'code to print error messages

end sub

Compile Error:
Procedure Declaration does not match description of event or procedure
having the same name.

I am using VB6 and ADO 2.7
I copied the declaration directly from the object browser. i just added the
explicit declarations ( adodb.)

Thank You,

Carl