[dekra]

I need your help!!!!

I want to execute my VB6 application using a batch file (*.bat)... I have already achived this, but I need to throw back a return/error variable back to the batch file... Is this possible?

Ex. (Batch file)

x = VB6app.exe

How can I throw the return value back to x from my VB6 app?

Thanks!

[DougT]

Hi,

You can use a couple of APIs to set a return code from your Progam:
The following statements go into the Declarations section:

Code:

Private Declare Function TerminateProcess Lib "kernel32" _
                (ByVal hProcess As Long, _
                 ByVal uExitCode As Long) As Long

Declare Function GetCurrentProcess Lib "kernel32" () As Long

Then, when you exit your Program;

Code:

lngprocess = GetCurrentProcess
lngReturn = TerminateProcess(lngprocess, lngReturnCode)

Where lngReturn, lngprocess and lngReturncode are of type Long
You should set lngReturnCode to the value you wish to be passed back to the .bat file.
The Variable ERRORLEVEL within the .bat file will be set to the value of lngReturnCode when the program terminates.

Example .bat file:

Code:

@echo off
MyProg.exe  
if ERRORLEVEL 4 echo Error 4

This executes the program called MyProg.exe and if it sets the return code to 4 a message "Error 4" is displayed.

Regards
Doug