请问用ASP对文件的读写不行怎样解决

1   
2dim mytext   
3mytest= "你好,ok"   
4Set fileso = Server.CreateObject("Scripting.FileSystemObject")   
5Set fileout = fileso.CreateTextFile("d:/test/text.txt")   
6fileout.WriteLine mytext   
7fout.close   

显示错误为:
Microsoft VBScript 运行时错误 错误 '800a01ad'
ActiveX 部件不能创建对象
/test/abc.asp，行4

我的机装win2000 server.VB也装了
我在Internet信息服务->虚拟目录中将"写入（W）选上，目录也有写入权限。其他机可以，就是我的机不行。请问高手怎样解决呢？谢谢！

[email protected]

---------------------------------------------------------------

你的Scripting.FileSystemObject组件是不是坏了？
---------------------------------------------------------------

Scripting.FileSystemObject

对象没有建成
---------------------------------------------------------------

看你的组件服务启动没？