Cor Ligthert [MVP] a écrit :
Bernard,
Can you show the code?
On MSDN is written how to use it, we cannot change that.
Now you have only told, that it does not appear. By most of us it appears so
you should have done something special.
Cor
"Bernard Bourée" <be*****@bouree.net> schreef in bericht
news:e1**************@TK2MSFTNGP02.phx.gbl... In order to trace my job I placed some
Debug.Writeline in my code but they don't appear in the output window!
How to solve it?
Thanks
Bernard
Cor
Of course I can show the code.
I have a small routine in order to trace my code.
Here it is.
It was working fine before but now not.
I have looked at the options but could not find a related item.
Thanks for your help
Bernard
Public Sub PrintLog(ByVal sMsg As String, Optional ByVal sTitre As
String = vbNullString)
Dim fs As New Scripting.FileSystemObject
Dim Stream As Scripting.TextStream
Dim NF As String
NF = NOM_FICHIER_LOG & "_" & Replace(CStr(Today), "/", "_") &
".log"
Stream = fs.OpenTextFile(NF, Scripting.IOMode.ForAppending, True)
Stream.WriteLine(CType(System.DateTime.Now, String))
Stream.WriteLine(sTitre & " : " & sMsg)
Debug.WriteLine(sMsg, sTitre)
Stream.Close()
bLogImprimé = True
End Sub