vb script time / date /filename

folks

how do I add the file name , date and time to the log file in the below statement? also ensure these have comma delimiters in them

strFolder = "C:\test"
Dim objFSO
Dim objFile
Dim objOut
Set objFSO = CreateObject("Scripting.FileSystemObject")
Const intForReading = 1
 
 'create output file
 strOutputName = "output.txt"
 Set objOut = objFSO.GetFolder(strFolder).CreateTextFile(strOutputName, True)
 
'for each file in directory
For Each objFile In objFSO.GetFolder(strFolder).Files
        'if its a log file
        If Right(LCase(objFile.Name), 4) = ".log" Then
               'open log file
                Set objFile = objFSO.OpenTextFile(objFile.Path, intForReading, False)
                'loop thorugh log file
           Do While Not objFile.AtEndOfStream
                        strData = objFile.ReadLine
                        If InStr(strData, "connected") Or InStr(strData, "refused") Then objOut.WriteLine strData
                Loop

                objFile.Close
        End If
Next
objOut.Close
'MsgBox "Finished."