Detect if a VB6 App is Running on a 64 bit Operating System

Category:

System/API

Type:

Snippets

Difficulty:

Intermediate

Author:

Spider Harper

Version Compatibility: Visual Basic 6

More information:

This is a simple set of functions to determine if your VB6 (32-bit) code is running on a 64-bit windows operating system, using WOW64. I have tested it on W2K SP4 Server (32-bit), XP Pro (32-Bit) and W2K3 SP1 Server (64-Bit).

Instructions: Copy the declarations and code below and paste directly into your VB project.

Declarations:
Private Declare Function GetProcAddress Lib "kernel32" _ (ByVal hModule As Long, _ ByVal lpProcName As String) As Long Private Declare Function GetModuleHandle Lib "kernel32" _ Alias "GetModuleHandleA" _ (ByVal lpModuleName As String) As Long Private Declare Function GetCurrentProcess Lib "kernel32" _ () As Long Private Declare Function IsWow64Process Lib "kernel32" _ (ByVal hProc As Long, _ bWow64Process As Boolean) As Long

Code:

Advertiser Disclosure: Some of the products that appear on this site are from companies from which QuinStreet receives compensation. This compensation may impact how and where products appear on this site including, for example, the order in which they appear. QuinStreet does not include all companies or all types of products available in the marketplace.