ShellExecute Issue within VB6 on Windows 8
Posted on 2014-01-15
We have the following function in VB6..
Public Function OpenWithDefault(ByVal FileName As String) As Boolean
'ShellExecute returns a value greater than 32 if it was successful
OpenWithDefault = (ShellExecute(0&, "open", FileName, vbNullString, vbNullString, SW_SHOWNORMAL) > 32)
Basically we are forcing the opening of a report in a pdf after the user runs a certain process.
In windows XP this code works fine and the report pops up fine in the PDF. HOWEVER, in Windows 8, when the user runs the process, the report does not come up, All we see is like a flash...
Any ideas on what in Windows 8 is stopping this??