VBScript - Textdatei einlesen bzw. beschreiben

Hallo Leute!

Ich würde gerne ein VBScript so abändern, das anstatt bei einem Fehler eine MSGBOX erscheint, der Fehler an eine Texdatei angehängt wird.

IST-Zustand:
If err.Number <> 0 Then
MsgBox "Fehler2: " & err.Number & " " & err.Description
err.Clear

Meine Frage lautet nun, wie öffne ich eine Textdatei in VBS und beschreibe diese (ich kanns leider nur in VB)

Vielen Dank

MFG heyneb

Set fso = CreateObject("Scripting.FileSystemObject")  
Set oFile = fso.OpenTextFile("C:\log.txt",8,true)  
If err.Number <> 0 Then
    oFile.WriteLine "Fehler2: " & err.Number & " " & err.Description  
    err.Clear
Else
    oFile.WriteLine "Kein Fehler aufgetreten."   
End If
oFile.close