I get this error from VB6 when calling this line:
Run-time error '5'
GetApp = Shell(App.Path & "\updateapp.bat", vbNormalNoFocus)
I do not see any setfocus in my code that I usually see through this error. This code does work by the way in a clean project with noting else.