在括号里填写适当的内容,以便读取当前目录中的文本文件“test.txt”  <%  Dim fso , f  Set  fso = Server.CreateObject()  ’创建FSO对象实例  Set  f = fso.()()   ’打开文件并返回textStream对象  while  Not  f.() ’当文件指针不在文本文件末尾时执行循环  Response.Write  f.()&"
" ’读取一行字符发送到浏览器  Wend  f.Close  %>
出自:国家开放大学《网络编程技术》