<%set fs=server.CreateObject("scripting.FileSystemObject")
set tfile=fs.createtextfile("F:\动态新建文件夹和html页\text.txt")
tfile=write("这是测试字符串")
tfile=writeline()
tfile=writeline("这是测试写入字符串并换行")
tfile=write("这是测试上句是否换行了")
tfile=writeblanklines(5)
tfile=write("测试上句换行效果")
tfile.close
%>
运行这段代码老出现下面的问题
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: 'write'

/aa/write.asp，行4
这是什么原因？