VB6 Shell function works in ide but not in exe
Posted on 2014-01-31
I have a simple VB program to make CAB files using the makefile.exe utility that ships with windows. The program runs without error and makes the cab files specified when I run it through the IDE. When I compile it, the makefile.exe utility fails to make the cab files but does not show any errors. I tried the built in VB shell function, and the ShellExecute API with the same results. To debug, I wrote a batch program in the application with a pause command after the makecab.exe command to see what is happening. The makefile.exe seems to run and displays the same output that I see when I run it manually from a cmd prompt, it just does not make the cab file.
dim i as integer
i = FreeFile
Open "C:\DIRS\RMakeCab.bat" For Output As #i
Print #i, "@echo off"
Print #i, "cls"
Print #i, "call makecab.exe /f " & "C:\DIRS\dirsends.ddf"
Print #i, "pause"
dim x as long
x = ShellExecute(Me.hwnd, "", "C:\DIRS\RMakeCab.bat", "", "", SW_HIDE)
'x = Shell("makecab.exe /f " & dirsends.ddf", vbHide) 'tried both...
Any ideas on what I'm missing here would be greatly appreciated...