Sign in to follow this  
Followers 0
Hammad

FileWrite() within a function

8 posts in this topic

Hi,

I am trying to implement error and debug logging using FileWrite function by calling it from my logging functions. Although it is able to create a log file, I always find it empty for some reason. If I call FileWrite from my main script, it functions well. Can anyone help me out in this regard? Here is my code:

This part is in a custom UDF file I include in my scripts.

Func _DbgPrint($DbgMsg="undef",$FuncName="undef")
if $DbgMsg = "undef" Then
  ConsoleWrite("Undefined Error!" & @CRLF)
  FileWrite($LogDir & $DbgLogFile,$scriptNameNoExt & ": Undefined Breakpoint!" & @CRLF)
Else
  ConsoleWrite("in " & $FuncName & ": " & $DbgMsg & @CRLF)
  $filewritestatus=FileWrite($LogDir & $DbgLogFile,$scriptNameNoExt & ": in " & $FuncName & ": " & $DbgMsg & @CRLF)
  ConsoleWrite($filewritestatus&@CRLF)
EndIf
EndFunc
Func _ErrorNQuit($ErrMsg="undef",$FuncName="undef")
if $ErrMsg = "undef" Then
  ConsoleWrite("Undefined Error!" & @CRLF)
  FileWrite($LogDir & $LogFile,$scriptNameNoExt & ": Undefined Error!" & @CRLF)
Else
  ConsoleWrite("in "& $FuncName & ": " & $ErrMsg & @CRLF)
  FileWrite($LogDir & $LogFile,$scriptNameNoExt & ": in" & $FuncName & ": " & $ErrMsg & @CRLF)
EndIf
ProcessClose($AppProcess)
Call("_StopMSNetMonitor")
Call("_unConfigDataPlane")
Exit
EndFunc

This part is where I call these functions from my script:

Call("_DbgPrint","hello","world")
sleep(10000)

All the variables have the expected values. FileWrite() also returns 1 (success) when it is run. If any more info is required, please let me know.

Thanks.

Share this post


Link to post
Share on other sites



Hammad,

If I call FileWrite from my main script, it functions well.

That sounds like a scope problem. You are checking the data you are writing, have you also checked that the file path and name are correct within the function? Do $LogDir, $DbgLogFile and $LogFile have Global scope? :)

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites

Melba,

$LogDir, $DbgLogFile and $LogFile are defined with global scope in a separate myDEF.au3 file include at the start of myUDF.au3

The fact that the file is created in the right directory with the right name is also a verfication of that. However, that file is empty at the end of the script runs, as well as just after the function is called (I pause the script to check that).

Share this post


Link to post
Share on other sites

Hammad,

I thought that might be too easy a solution! ;)

Could you post the whole script and your own includes so I can take a look? :)

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites

This is myDEF.au3

Global $opt_N="defaulttest"
Global $opt_R="default"
Global $TestCaseName=$opt_N
Global $logDir=""
Global $pcapDir=""

Global $timeStamp= @MON & @MDAY & @YEAR &"-" & @HOUR & @MIN & @SEC
Global $scriptNameNoExt=StringSplit(@ScriptName,".")
Global $logFile=$scriptNameNoExt[1] &  "-ERR" & ".txt"
Global $DbgLogFile=$scriptNameNoExt[1] &  "-DBG" & ".txt"

Global $AppName=""
Global $AppProcess=""
Global $AppRuleName="unclassified"

Global $PingInfraction=0

This is myUDF.au3

#include <array.au3>
#include <myDEF.au3>
Func _CreateFolder()
If not FileExists($LogDir) Then
    ;DirRemove($logDir,1)
    DirCreate($LogDir)
EndIf
Func _ErrorNQuit($ErrMsg="undef",$FuncName="undef")
    if $ErrMsg = "undef" Then
        ConsoleWrite("Undefined Error!" & @CRLF)
        FileWrite($LogDir & $LogFile,$scriptNameNoExt & ": Undefined Error!" & @CRLF)
    Else
        ConsoleWrite("in "& $FuncName & ": " & $ErrMsg & @CRLF)
        FileWrite($LogDir & $LogFile,$scriptNameNoExt & ": in" & $FuncName & ": " & $ErrMsg & @CRLF)
    EndIf
    Exit
EndFunc
Func _DbgPrint($DbgMsg="undef",$FuncName="undef")
    if $DbgMsg = "undef" Then
        ConsoleWrite("Undefined Error!" & @CRLF)
        FileWrite($LogDir & $DbgLogFile,$scriptNameNoExt & ": Undefined Breakpoint!" & @CRLF)
    Else
        ConsoleWrite("in " & $FuncName & ": " & $DbgMsg & @CRLF)
        $filewritestatus=FileWrite($LogDir & $DbgLogFile,$scriptNameNoExt & ": in " & $FuncName & ": " & $DbgMsg & @CRLF)
        ConsoleWrite($filewritestatus&@CRLF)
    EndIf
EndFunc
Func _CommonStartup($FallbackBit=1)
    Call("_ReadCmdLineParams", ":N:R")
    $TestCaseName=$opt_N
    $Scenario=$opt_R
    $logDir= @ScriptDir & "..output" & $TestCaseName & "logs"
    $pcapDir=@ScriptDir & "..output" & $TestCaseName & "pcaps" & $AppRuleName & ""
    Call("_DbgPrint","starting connectivity test","_CommonStartup")
    AdlibRegister("_ConnectivityTest",60000)
    Call("_DbgPrint","creating output folders","_CommonStartup")
    Call("_CreateFolder")
    Call("_DbgPrint","moving mouse out of the way","_CommonStartup")
    MouseMove(0,0,5) ;avoid any mouse-over conflics
    Call("_DbgPrint","_CommonStartup completed successfully","_CommonStartup")
EndFunc

Func _CommonEnd()
    AdlibUnRegister("_ConnectivityTest")
EndFunc
Func _ConnectivityTest()
    If Not Ping("8.8.8.8") Then
        $PingInfraction=$PingInfraction+1
        if $PingInfraction = 6 Then
            Call("_ErrorNQuit","Connectivity test failed","_ConnectivityTest")
        EndIf
    Else
        $PingInfraction=0
    EndIf
EndFunc

And this is the script that I am writing using functions from myUDF:

#include<myUDF.au3>
Call("_CommonStartup",1)
Call("_DbgPrint","hello","world")
sleep(10000)
Call("_CommonEnd")

Share this post


Link to post
Share on other sites

Are the two variables $LogDir & $LogFile set correctly? I mean has $LogDir a "" at the end or does $LogFile start with a ""?


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

Hammad,

You need to use $scriptNameNoExt[1] in functions _DbgPrint and _ErrorNQuit - at the moment you use the whole $scriptNameNoExt array and so Autoit refuses to print anything. :)

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites

Thanks, Melba

That took care of the problem. (stupid me)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0