Rocky Smolin
rockysmolin at bchacc.com
Sun May 12 20:27:55 CDT 2013
AHA! 5.3 extensibility because its A2K3, but don't know how I missed that - thought I checked the references. Anyway, it compiles. Now to test if it works like it always did. Which I'm sure it will. Thanks R -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Bill Patten Sent: May 12, 2013 11:30 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error Traps - Question for Colby Rocky, Try setting references in the IDE to Microsoft Visual Basic 6.0 Extensibility. Bill -----Original Message----- From: Rocky Smolin Sent: Sunday, May 12, 2013 8:36 AM To: 'Access Developers discussion and problem solving' Subject: [AccessD] Error Traps - Question for Colby JC: I'm using your error module builder to put error traps into an app for a client. I haven't used it for years but it always worked in the past. Now I'm getting a compile error in this new app Compile error variable not defined. and vbext_pk_Getis highlighted in 'GET THE STRING THAT REPRESENTS THE PROCEDURE TYPE Select Case .lngProcKind Case vbext_pk_Get .strProcKind = "Get" Case vbext_pk_Let .strProcKind = "Let" Case vbext_pk_Set .strProcKind = "Set" Case vbext_pk_Proc If InStr(.strProcDecl, "Sub") = 0 Then .strProcKind = "Function" Else .strProcKind = "Sub" End If Case Else End Select But I can't find any other reference to vbext_pk_Get even in an old app where the code works and compiles correctly. Do yo know what might be the problem? Thanks and regards, Rocky Smolin Beach Access Software 858-259-4334 www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com <http://www.e-z-mrp.com/> Skype: rocky.smolin -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com