OnAutoItExitRegister isn't being called when ran from .exe

[Pelicer]

Hello, all!

 

I'm developing a change to a RPA in which it should warn my database if it is currently running. If not, it should warn too.  My approach was to create a function that will check in a config file if I want to report. If so, report either 1 (active) or 0 (innactive).  The code below is working really fine when I run it from .au3.

 

expandcollapse popup

OnAutoItExitRegister("_ReportActivity")


;==============================================================================================================================
; Function:         _ReportActivity()
;
; Description:      Call WEB service to report DSL that the RPA is currently running
;
; Parameter(s):     -
;
; Return Value(s):  Void
;
; Author (s):       Silva, William
;===============================================================================================================================
Func _ReportActivity()

    ; Mandatory for Error Code Control
    Local $l_szFuncName =  "_ReportActivity"
    ;Local vars
    Local $szSetupFile = @ScriptDir & "\ini\SETUP.ini"
    Local $szSetupData = ""
    Local $szReturn = ""
    Local $nStatus


    _FileWriteLog(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & ".log", "[" & $l_szFuncName & " @ " & 1 & "] " & "Trying to report DSL..." & @CRLF )
    ConsoleWrite(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & "[" & $l_szFuncName & " @ " & 1 & "] " & "Trying to report DSL..." & @CRLF )

    ;Code
    If Bool($_bReportActivity) Then
        If Not FileExists( $szSetupFile ) Then
            ;Write error log

            _FileWriteLog(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & ".log", "[" & $l_szFuncName & " @ " & 1 & "] " & "Setup.ini file not found. Could not contact DSL to report activity." & @CRLF )
        Else
            ;Reads the file
            $szSetupData = BinaryToString(base64(FileRead ( FileOpen( $szSetupFile,0)), False))
        EndIf

        $szReturn = _CallWebServiceDSL($nStatus , _IniMem_Read($szSetupData, "DSL_DATA","POST",""), _IniMem_Read ($szSetupData,"DSL_DATA","HOST",""), _IniMem_Read ($szSetupData,"DSL_DATA","ConType",""), _IniMem_Read ($szSetupData,"DSL_DATA","SoapAct","") , "2D42AC0A-9643-4780-9198-BDE886A958CF", _
                                                _IniMem_Read ($szSetupData,"DSL_DATA","Module",""), "UpdateSoftwareBundleSettings", _IniMem_Read($szSetupData,"DSL_DATA", "inkjet_name")&";ACTIVE;PARAMETER;"&$_nActive,_IniMem_Read ($szSetupData,"DSL_DATA","SEPARATOR",";"))

        _FileWriteLog(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & ".log", "[" & $l_szFuncName & " @ " & 1 & "] " & "Report to DSL is Enabled. Reported: " & $_nActive & @CRLF )
        ConsoleWrite(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY &"[" & $l_szFuncName & " @ " & 1 & "] " & "Report to DSL is Enabled. Reported: " & $_nActive & @CRLF)

        If($_nActive == 0) Then
            _FileWriteLog(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & ".log", "[" & $l_szFuncName & " @ " & 1 & "] " & "Code: " & @exitCode &" Method: " & @exitMethod)
        Endif

        ;Sets the $_nActive to its opposite
        $_nActive = ($_nActive = 1) ? 0 : 1
    Else
        _FileWriteLog(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & ".log", "[" & $l_szFuncName & " @ " & 1 & "] " & "Report to DSL is Disabled." & @CRLF )
        ConsoleWrite(@ScriptDir & "\" & @YEAR & "-" & @MON & "-" & @MDAY & "[" & $l_szFuncName & " @ " & 1 & "] " & "Report to DSL is Disabled." & @CRLF )
    EndIf
Endfunc

Func Main()
    _ReportActivity()
    ...
Endfunc

Main()

 

When the above is running from .exe, it reports active. But on exit (I'm trying by clicking the close button of the prompt window), it does not call the function. I was having a problem previously in which the RPA would crash any time I tried to exit it. I figured out that  a global variable that was being used as parameter to call another function from _ReportActivity caused that error. I fixed it, and then tried to remove all kinds of global variables from the function, but It still won't work when running from .exe. 

[Nine]

I use it all the time in exe and it is working fine.  I suggest you make a small runable snippet that reproduces the problem.

[Pelicer]

I have just run more tests. Apperantly, the .exe is not calling OnAutoItExitRegister when the prompt is closed by clicking the close button of the window. 

[Nine]

oh, you mean you open a DOS window (cmd.exe), you start your exe and in the middle of the script you close the DOS window ?

[water]

Even in this case the function gets called:

#include <GUIConstantsEx.au3>
OnAutoItExitRegister("_Exit")

Example()

Func Example()
    ; Create a GUI with various controls.
    Local $hGUI = GUICreate("Example")
    Local $idOK = GUICtrlCreateButton("OK", 310, 370, 85, 25)

    ; Display the GUI.
    GUISetState(@SW_SHOW, $hGUI)

    ; Loop until the user exits.
    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE, $idOK
                ExitLoop

        EndSwitch
    WEnd

    ; Delete the previous GUI and all controls.
    GUIDelete($hGUI)
EndFunc   ;==>Example

Func _Exit()
    MsgBox(0, "Exit", "Program is now closed!")
EndFunc

 

[Nine]

@water I think he means DOS window, not GUI window...

[water]

In this case we need a reproducer script!
This kind of automation should be possible without an open DOS window.

[Pelicer]

Yes, @Nine. I'm sorry for the confusion. So the problem is: there's a batch file that makes the decision if it should open x64 or x86 version. The .exe IS calling the OnAutoItExitRegister when a exit event is ran. But when I close the DOS, I'm not actually closing the .exe... 

 

What I need right now, I think, is to somehow have a OnExit event on CMD, to end the .exe from there.

[water]

You could either translate the bat file to AutoIt as well or use one of the described tips how to run a bat file without DOS window (so the user can't close).

https://www.raymond.cc/blog/hidden-start-runs-batch-files-silently-without-flickering-console/
https://www.robvanderwoude.com/battech_hideconsole.php

 

Edited March 11, 2019 by water

[Nine]

@Pelicer Understand.  Could you simply test repeatedly if the cmd.exe window still exists, and if not, exit the script.  Or you could start a second script from the first that would check for that DOS window still exists, and close your 1st script in case DOS window is close