Upgrade from 32 bit to 64 bit

[willkr]

I have a home budget system that I wrote about 10 years ago running on a 32 bit windows installation on an old desktop. I recently purchased a new laptop with 64 bit windows and my access DB won't run on the new system. The database application is about 2000 lines of code, but all the I/O is in a separate module. I think my old desktop system is starting to fail, so I desperately need to convert the application to 64 bit. Can someone point me to where I can learn about converting the application to 64 bit?

[June7]

32-bit Access should run with 64-bit Windows. Does for me. Is your db MDB or ACCDB?

By 'separate module' do you mean a split design with Access front and back ends?

[Welshgasman]

Same here, MDB and ACCDB. Are you now using 64bit access?

[ranman256]

be sure to search all DECLARE statements and add the PTRSAFE block so the app can be used in either OS.

#If Win64 Then      'Public Declare PtrSafe Function
     Private Declare PtrSafe Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As LongPtr
 #Else
      Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long
#End If

[isladogs]

Can someone point me to where I can learn about converting the application to 64 bit?

Just adding PtrSafe isn't enough to make APIs work in 64-bit
For example, the API declaration in post #4 is incorrect and should be written:

 #If VBA7 Then 
    Private Declare PtrSafe Function GetSystemMenu Lib "user32" (ByVal hWnd As LongPtr, ByVal bRevert As Long) As LongPtr
 #Else
      Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long 
#End If

Two good references for learning about 32 to 64-bit conversion:
Windows API declarations in VBA for 64-bit - Codekabinett
Access 32to64 Bit (thememydatabase.co.uk)

[Micron]

64 bit windows

The bitness of the OS has no bearing on this - what matters is the bitness of Office?
What Access version was used 10 years ago? If it was 97, that is your problem. Knowing what happens when you try to open the old db would help.

[KNicholson]

You can manually change the:
Private Declare Function
to
Private Declare PtrSafe Function

and/or add this to your database:

Option Compare Database
#If VBA7 Then
Private Declare PtrSafe Function GetDriveType Lib "kernel32.dll" Alias "GetDriveTypeA" _
(ByVal lpRootPathName As String) As DriveType
#Else
Private Declare GetDriveType Lib "kernel32.dll" Alias "GetDriveTypeA" _
(ByVal lpRootPathName As String) As DriveType
#End If
Private Enum DriveType
DRIVE_UNKNOWN = 0
DRIVE_NO_ROOT_DIR = 1
DRIVE_REMOVABLE = 2
DRIVE_FIXED = 3
DRIVE_REMOTE = 4
DRIVE_CDROM = 5
DRIVE_RAMDISK = 6
End Enum

[willkr]

OK, I added the PtrSafe to all the declarations. Now I get a compile error in a module called LoadPictureGDIP. The code looks like this

'Load image file with GDIP
'It's equivalent to the method LoadPicture() in OLE-Automation library (stdole2.tlb)
'Allowed format: bmp, gif, jp(e)g, tif, png, wmf, emf, ico
Function LoadPictureGDIP(sFileName As String) As StdPicture
Dim hBmp As Long
Dim hPic As Long


If Not InitGDIP Then Exit Function
If GdipCreateBitmapFromFile(strPtr(sFileName), hPic) = 0 Then
GdipCreateHBITMAPFromBitmap hPic, hBmp, 0&
If hBmp <> 0 Then
Set LoadPictureGDIP = BitmapToPicture(hBmp)
GdipDisposeImage hPic
End If
End If


End Function

I get a compile error on the first executable line.

I am in really over my head here guys, but I'll keep plugging on.

Will

[willkr]

The error message I get is "Compile error:
Type mismatch

the thing highlighted is
StrPtr
on the second line after the Dim statements

Will

[June7]

What is StrPtr() function supposed to do? I don't see any advice in this thread about such a function.

Maybe you should attach db for analysis, follow instructions at bottom of my post.

[willkr]

I've read through the Access32to64 document. It says, "Update all "Declare" statements to include PtrSafe and adjust their parameters from Long to LongPtr, where requred." How do I know where it is required and where it isn't?

[willkr]

I'll see what I can do to about attaching the db. It's a bit sensitive since it contains all my bank account and credit card information. After all, it is a home budget management system. It may be next week before I can get to it.

[June7]

I have Access 2010 32-bit running on 64-bit Windows10. I have not changed Long to LongPtr and db still works.

Are you running Access 32-bit or Access 64-bit?

[isladogs]

Handles/pointers such as hBmp & hPic need to be changed from Long to LongPtr for use with 64-bit Access. Don't change all Long variables however.
Other related changes may be needed so you should try to do the conversion yourself.

Recommend you try Peter Cole's conversion utility from the second link in my previous post.

[Welshgasman]

Are you running Access 32-bit or Access 64-bit?

Asked in post #3 and never responded to?