![windows only running 32 bit on 64 bit windows only running 32 bit on 64 bit](https://i100.photobucket.com/albums/m2/sextonphoto/Capture-1.png)
Public Const OFN_CREATEPROMPT As Long = &H2000 Public Const OFN_ALLOWMULTISELECT As Long = &H200 Private Const BFFM_SETEXPANDED As Long = WM_USER + 106 '// Unicode only Private Const BFFM_SETOKTEXT As Long = WM_USER + 105 '// Unicode only Private Const BFFM_SETSTATUSTEXTW As Long = WM_USER + 104 Private Const BFFM_SETSELECTIONW As Long = WM_USER + 103
![windows only running 32 bit on 64 bit windows only running 32 bit on 64 bit](https://ebookgraphy.com/images/run-32-bit-application-on-64-bit-windows-7-3.png)
Private Const BFFM_SETSELECTIONA As Long = WM_USER + 102 Private Const BFFM_ENABLEOK As Long = WM_USER + 101 Private Const BFFM_SETSTATUSTEXTA As Long = WM_USER + 100 Private Const BFFM_IUNKNOWN As Long = 5 '// provides IUnknown to client. Private Const BFFM_VALIDATEFAILEDW As Long = 4 '// lParam:wzPath ret:1(cont),0(EndDialog) Private Const BFFM_VALIDATEFAILEDA As Long = 3 '// lParam:szPath ret:1(cont),0(EndDialog) Private Const BFFM_SELCHANGED As Long = 2
![windows only running 32 bit on 64 bit windows only running 32 bit on 64 bit](https://www.top-password.com/blog/wp-content/uploads/2020/03/view-platform-in-task-manager.png)
Private Const BFFM_INITIALIZED As Long = 1 Private Const MAX_PATH As Long = 260 '// message from browser Private Const CSIDL_DRIVES As Long = &H11 Private Const BIF_RETURNONLYFSDIRS As Long = 1 Private Declare PtrSafe Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As LongPtr) (ByVal Hwnd As LongPtr, ByVal wMsg As Long, _īyVal wParam As LongPtr, lParam As Any) As LongPtr Public Declare PtrSafe Function SendMessageA Lib "user32" _ (ByVal pidList As LongPtr, ByVal lpBuffer As String) As Long Private Declare PtrSafe Function SHGetPathFromIDList Lib "shell32.dll" _ "SHBrowseForFolderA" (lpBrowseInfo As BrowseInfo) As Long Private Declare PtrSafe Function SHBrowseForFolder Lib "shell32.dll" Alias _ "GetSaveFileNameA" (pOpenfilename As OPENFILENAME) As Long Private Declare PtrSafe Function GetSaveFileName Lib "comdlg32.dll" Alias _ "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long Private Declare PtrSafe Function GetOpenFileName Lib "comdlg32.dll" Alias _
#WINDOWS ONLY RUNNING 32 BIT ON 64 BIT CODE#
'' Following code is copied from Autodesk discussion forum here: SO, I copy all the code I changed here:ġ. Create a new module, name it "modCommonDialog64bit" (or whatever name you choose). Well, it looks like, for some reasons, the zip attachment is not allowed on my side.