Search the Community

My script fails when I try to run it natively under 64bit but works if emulating 32bit. It's from a large script so I have reduced it to just an example with the failing function (found from a google search to decode Base64 data). Setting #AutoIt3Wrapper_UseX64=n allows the script to work OK Setting #AutoIt3Wrapper_UseX64=y crashes the script in a way that I cannot trap the error. I suspect the use of "user32.dll" when running natively (no 32bit emulation) is what's causing AutoIt to dramatically crash out. I'd like very much to know how to amend the function to work with 64bit so that I can test which to call using: If @AutoItX64 = 1 Then Any ideas please? #AutoIt3Wrapper_UseX64=n ;#AutoIt3Wrapper_UseX6=n - Script works OK and the MsgBox gives "oxA1A2A3A4B1B2B3B4" ;#AutoIt3Wrapper_UseX6=y - Script crashes and AutoIT3.exe ended. rc:- 1073741819 (Win 7 gives "AutoIt v3 Script has stopped working") MsgBox(0,"Base64Decode",_Base64Decode("oaKjpLGys7R=")) Func _Base64Decode($Data) Local $Opcode = "0xC81000005356578365F800E8500000003EFFFFFF3F3435363738393A3B3C3DFFFFFF00FFFFFF000102030405060708090A0B0C0D0E0F10111213141516171819FFFFFFFFFFFF1A1B1C1D1E1F202122232425262728292A2B2C2D2E2F303132338F45F08B7D0C8B5D0831D2E9910000008365FC00837DFC047D548A034384C0750383EA033C3D75094A803B3D75014AB00084C0751A837DFC047D0D8B75FCC64435F400FF45FCEBED6A018F45F8EB1F3C2B72193C7A77150FB6F083EE2B0375F08A068B75FC884435F4FF45FCEBA68D75F4668B06C0E002C0EC0408E08807668B4601C0E004C0EC0208E08847018A4602C0E00624C00A46038847028D7F038D5203837DF8000F8465FFFFFF89D05F5E5BC9C21000" Local $CodeBuffer = DllStructCreate("byte[" & BinaryLen($Opcode) & "]") DllStructSetData($CodeBuffer, 1, $Opcode) Local $Ouput = DllStructCreate("byte[" & BinaryLen($Data) & "]") Local $Ret = DllCall("user32.dll", "int", "CallWindowProc", "ptr", DllStructGetPtr($CodeBuffer), _ "str", $Data, _ "ptr", DllStructGetPtr($Ouput), _ "int", 0, _ "int", 0) Return BinaryMid(DllStructGetData($Ouput, 1), 1, $Ret[0]) EndFunc ;==>_Base64Decode