FredixBlog


Just my log about anything I could find enjoyable.



Message to log file

author Posted by: fredometro on date Jan 1st, 2004 | filed Filed under: MS-Access

This one prints a line to a log file.


Global Const LogFileName = "c:\\anyfolder\\log\\logfile.log"

Public Sub LogMessage(TheMessage)
Dim fnum As Integer
    fnum = FreeFile
    Open LogFileName For Append As fnum
    Print #fnum, Format(Now(), "dd:mm:yy HH:MM") & " " & TheMessage
    Close fnum
End Sub

No related posts.

     Add A Comment

You must be logged in to post a comment.


Warning: include(/home/www/web421/html/phpTraffic/write_logs.php) [function.include]: failed to open stream: No such file or directory in /home/websitef/public_html/fredometro.com/wp-content/themes/blueshadow/footer.php on line 15

Warning: include() [function.include]: Failed opening '/home/www/web421/html/phpTraffic/write_logs.php' for inclusion (include_path='.:/usr/lib/php:/usr/local/lib/php') in /home/websitef/public_html/fredometro.com/wp-content/themes/blueshadow/footer.php on line 15