' ' libreria : VBlib ' file : Log.vb ' ' funzioni : gestione log file ' ' copyright 2008-2017 C.Viviani ' Imports System.IO Imports Microsoft.VisualBasic Public Module Log Const MAX_LOG_FILE As Long = 1000000 Dim fs As FileStream Dim szInternalFilename As String Public Sub init(ByVal szLogFileName As String) End Sub Sub finish() End Sub Sub write(ByRef sz_arg As String) End Sub Sub write_and_messagebox(ByRef sz_arg As String, n_error As Integer) End Sub Private Sub ll_write(ByRef sz_arg As String) End Sub End Module