Copy link to clipboard
Copied
After Update the command :
Result = apiShellExecute(hWndAccessApp, vbNullString, _
"c:\tmp\123.pdf", vbNullString, vbNullString, WIN_MAX)
Opens then Acrobat for a second end closes immediately.
Tryed to switch to :
Result = Shell("rundll32.exe shell32.dll,OpenAs_RunDLL " & "c:\tmp\123.pdf", WIN_NORMAL)
the windows opening select default program to open the file.
Have something to add?