FileWriteLine stops working in mid-run

[jfornango]

So, I am working on a process, and am using FileWriteLine to write out data to a log file. For the most part, this is working exactly as expected.  The problem comes at the end of the run.  Right before I close the program, I write out one last status line and then issue a FileClose.  When I look at the log file, everything is there, except the last line that I write out.  Here's the basic set up.

expandcollapse popup

; do some prep work
_prep()
_setupGUI()

While 1
    $ctrl_msg = GUIGetMsg()
    Select
    Case $ctrl_msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $ctrl_msg = $btnExit
        ExitLoop
    Case $ctrl_msg = $btnBackup
        _dataBackup()
        _rptBackupSummary()
        _IECreate($strBackSum)
        FileWriteLine($strProcessLog, _NowTime() & " Run Completed normally")
        ExitLoop
    Case $ctrl_msg = $btnCancel
        _dataCancel()
    EndSelect
WEnd
Exit

#cs  *****************************************************************************
    Backup
#ce  *****************************************************************************
Func _Backup()
; Create the backup folder in the location, and set up the backup log files
    DirCreate ($strDataLoc & "\" & @UserName & "\" & $strBackupFolder)
    $strTarget = $strDataLoc & "\" & @UserName & "\" & $strBackupFolder
    DirCreate ($strTarget & "\Logs")
    DirCreate ($strTarget & "\RegistryFiles")
    DirCreate ($strTarget & "\Outlook")

    $strProcessLog = $strTarget & "\Logs\Backup.log"
    FileOpen($strProcessLog, 9)
    FileWriteLine ($strProcessLog, "Backup Started: " & _Now())
    FileWriteLine ($strProcessLog, "Machine Name: " & @ComputerName)
    FileWriteLine ($strProcessLog, "User: " & @UserName & @CRLF & @CRLF)

; ... do some stuff ...
FileWriteLine($strProcessLog, _NowTime() & $strUpdate)

; ... do more stuff
FileWriteLine($strProcessLog, _NowTime() & $strUpdate)

; ... etc, etc....
FileWriteLine($strProcessLog, _NowTime() & $strUpdate)

End Func

Ok, so you get the basic jist of what I'm doing.

The only thing I can think of, is that the log file is being closed when I end the function, so the final FileWriteLine (in the Select) isn't going anywhere.

Am I following this correctly, or have I missed something else completely?

[kylomas]

jfornango,

The filewriteline in the select only happens when the $btnBackup control is actioned.  If this is not the problem, post the entire script.

kylomas

[water]

Your usage of FileOpen is wrong. FileOpen returns a handle which then should be used by all subsequent writes and FileClose:

$hLog = FileOpen($strProcessLog, 9)
FileWriteLine ($hLog, "Backup Started: " & _Now())

[kylomas]

 

Your usage of FileOpen is wrong. FileOpen returns a handle which then should be used by all subsequent writes and FileClose:

 

That is all true but I don't think that is his problem.  FileWriteLine opens and closes the file with each write when a file name is the 1ST parm as seen in this code...

local $myFile = @scriptdir & '\test.txt'
local $hfl = fileopen($myFile,9)

filewriteline($myFile,'line 1')
filewriteline($myFile,'line 2')
filewriteline($myFile,'line 3')

If the OP is expecting a filewriteline at code termination it is not being shown in the script he posted.

[water]

The FileOpen "bug" was the only quite obvious problem. Don't have the time to dig deeper intot he code.