这小段代码不行？为什么，能修改一下吗？

[alicc]

下面代码，生成一个asp页面，以unicode存储，结果运行这张AspTest.asp文件出现错误，错误最下面。
从错误上来看，是IIS 不能解析以unicode存储asp页面。这时，我该怎么处理，iis里是否可以设置支持unicode？？？？？？

Dim Fso As FileSystemObject
Dim Stream As TextStream

Set Fso = New FileSystemObject

Set Stream = Fso.CreateTextFile("C:\AspTest.asp", True, True)

Call Stream.WriteLine("<% Response.Write(""哈哈"")%>")

Stream.Close


错误：
Active Server Pages 错误 'ASP 0239'

无法处理文件

/AspTest.asp，行 1

UNICODE ASP 文件不被支持。

[shweze]

Set fso = server.CreateObject("Scripting.FileSystemObject")

[leohuang]

跟VB整混了
试试下面的代码
-----------------------------------------------------------
Dim Fso
Dim Stream

Set Fso = server.CreateObject("Scripting.FileSystemObject")
Set Stream = Fso.CreateTextFile("C:\AspTest.asp", True, True)

Call Stream.WriteLine("<% Response.Write(""哈哈"")%>")

Stream.Close