object required error for Scripting.FileSystemObject

am getting runtime error 424-object required on the bold line of following code:

****Dim fs, fname
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set fname = fs.CreateTextFile("D:\vb\myfile.txt", True)
fname.WriteLine ("something")
fname.Close
Set fname = Nothing
Set fs = Nothing*****

which object can possibly be required?any help?
thank you in advance...:)