Avatar of dhsimmons_sl
dhsimmons_sl
 asked on

Compile error using PrtSafe in VBA 6.0 with Conditional Compilation

Can any one help. I receive a compile error when adding PrtSafe to a Declare Function.

The code is:

' Declaration for the DeviceCapabilities function API call.
#If VBA7 Then
        Private Declare PtrSafe Function DeviceCapabilities Lib "winspool.drv" _
            Alias "DeviceCapabilitiesA" (ByVal lpsDeviceName As String, _
            ByVal lpPort As String, ByVal iIndex As Long, lpOutput As Any, _
            ByVal lpDevMode As Long) As LongLong
#Else
        Declare Function DeviceCapabilities Lib "winspool.drv" _
            Alias "DeviceCapabilitiesA" (ByVal lpsDeviceName As String, _
            ByVal lpPort As String, ByVal iIndex As Long, lpOutput As Any, _
            ByVal lpDevMode As Long) As Long
#End If

Please don't suggest removing the code. It is an inherited application and do not want to rewrite it.

Modules were created in Access 2007 with VBA 6.5 attempting to run with some users that have Office (Access) 2010 64-bit VBA 7.0.

Thank You
Microsoft ApplicationsMicrosoft DevelopmentMicrosoft Office

Avatar of undefined
Last Comment
aikimark

8/22/2022 - Mon
ASKER CERTIFIED SOLUTION
aikimark

Log in or sign up to see answer
Become an EE member today7-DAY FREE TRIAL
Members can start a 7-Day Free trial then enjoy unlimited access to the platform
Sign up - Free for 7 days
or
Learn why we charge membership fees
We get it - no one likes a content blocker. Take one extra minute and find out why we block content.
Not exactly the question you had in mind?
Sign up for an EE membership and get your own personalized solution. With an EE membership, you can ask unlimited troubleshooting, research, or opinion questions.
ask a question
I started with Experts Exchange in 2004 and it's been a mainstay of my professional computing life since. It helped me launch a career as a programmer / Oracle data analyst
William Peck