FSO Not Working

In my serverside script I have gone down to the bare bones and the following doesn't seem to work:

dim fs
dim fst
dim LineOut
set fs = Server.CreateObject"Scripting.FileSystemObject")
set fst = fs.CreateTextFile("C:TEMPhome.tmp",True)

lineout = "MAFFIdentifier" & vbtab & "Title" & vbtab & "Initials"
fst.writeline(lineout)
lineout = " ==================================================
========"
fst.writeline(LineOut)

fst.close
set fs = nothing

The server gets to the end since I place a response.write in to test.

If I cut and past this into VB declare the variables as objects and lineout as string and remove the "Server." from the line when setting fs, then it works fine in VB.