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