Rocky Smolin
rockysmolin at bchacc.com
Sun May 12 11:48:43 CDT 2013
There's no reference to them but in the app where I used it before and it compiles there's no reference there either. A mystery. Only JC knows... R -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of William Benson Sent: May 12, 2013 9:25 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Error Traps - Question for Colby Should be easy enough to check that all those constants exist, and I would, just to be safe. Second, since you are checking equality, try putting Case is = vbext_pk_Get On May 12, 2013 11:38 AM, "Rocky Smolin" <rockysmolin at bchacc.com> wrote: > > 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