[megaloman]

Если нужен log-файл, все равно скрипач батник не нужен, измените скрипт

Код:

...........
...........
...........
    End If
    ''''''''MsgBox Out
    ''''''''CreateObject("WScript.Shell").Run "Msg.exe" + " * " + CStr(Now()) + vbCr + Out, 0, False
    With .OpenTextFile(FileIn + ".log", 8, True)
        .writeline CStr(Now()) + vbTab + Replace(Out, vbCr, vbTab)
        .Close
    End With
End With

Лог-файл создаётся рядом с исходным файлом. Его можно удалять, он пересоздастся.

Насчет выхлопа, попробуйте в командном окне исполнить команды

Msg * kuku
Msg %Username% kuku

Как насчет выхлопа?