Scriptproblem i visual basic

Jag har gjort ett program i visual basic. Hursom helst, allt fungerar utom slutet.

Sub WriteToFile "C:\Documents and Settings\Fabian\Skrivbord\txtLog.txt"

har jag skrivit, men detta är tydligen fel. Någon som vet hur jag ska göra i stället?

Har nu läst detta samt sökt på google efter andra lösningar

Sub WriteToFile()
Open "C:\Documents and Settings\Fabian\Skrivbord\txtLog.txt"

Open App.Path & fileName For Output As #1

Write #1, txtLog.Text

Close #1

End Sub

felmeddelandet säger "slut på programsats förväntas"

Jadå, fixade det problemet, tackar

Nu får jag meddelandet, "Slut på programsats förväntas" på denna rad

Open App.Path "C:\Documents and Settings\Fabian\Skrivbord\txtLog.txt" For Output As #1

tecken 19

Någon som förstår varför detta händer?

Tack för hjälpen

Får det dock fortfarande inte att fungera

Sub WriteToFile()

Open "C:\Documents and Settings\Gustaf\Skrivbord\txtLog.txt"For Output As #1

Open App.Path "\txtLog.txt" For Output As #1

fick jag det till. Fortfarande Slut på programsats förväntas