一个很简单的ｆｓｏ问题

hh16115 发布于 2008-09-17 16:51， 1267 次点击

小弟刚刚开始学习ａｓｐ，正在学习ｆｓｏ，在网上找了一段代码，是一个创建文件并把数据写入文件中，代码是这样的：
<%
Sub CreateFile()
   Dim fso, tf
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set tf = fso.CreateTextFile("e:/huanghan.txt")
   tf.WriteLine("Testing 1, 2, 3.")
   tf.WriteBlankLines(3)
   tf.Write ("This is a test.")
   tf.Close
End Sub
%>

可是我运行了，根本没看到huanghan.txt文件啊，不知道怎么回事，小弟刚刚开始学，什么都不懂啊....

10 回复

孤独冷雨2008-09-17 17:11

在你运行的页面用call CreateFile 调用一下

hmhz2008-09-17 18:15

Sub 包含的是个函数体,你不调用它是不执行的

如果你调用了还没有那个文件存在,那就是服务器没有开放FSO

如果服务器已经开放了FSO,还是没有那个文件,那就是FSO没有开放匿名用户执行FSO

如果FSO已经开放匿名用户权限,还是没有那个文件,那就是该网站的文件夹没有开放匿名用户对文件夹的操作权限

如果以上问题都做到了，还是没有那个文件,那我建议你把服务器砸了!

hh161152008-09-17 18:51

呵呵　　已经成功了　谢谢各位啊

multiple19022008-09-18 13:09

3楼回答精彩，顶一下！

sunfishy2008-09-18 16:08

3楼逻辑很强..一看就知道是吃这碗饭的.

anlige2008-09-19 19:20

[bo][un]hmhz[/un] 在 2008-9-17 18:15 的发言：[/bo]

Sub 包含的是个函数体,你不调用它是不执行的

如果你调用了还没有那个文件存在,那就是服务器没有开放FSO

如果服务器已经开放了FSO,还是没有那个文件,那就是FSO没有开放匿名用户执行FSO

如果FSO已经开放匿名用 ...

haha ~

小树不修不直溜2008-09-19 22:01

Set fso = CreateObject("Scripting.FileSystemObject")

我也是刚学.我学的教程上创建FSO组件都要用sever对象啊
如果按我教程上来的话应该要这样写
Set fso =Server.CreateObject("Scripting.FileSystemObject")
难道不用server也可以吗?

yms1232008-09-20 00:16

Set fso = CreateObject("Scripting.FileSystemObject")
一般在客户端脚本的VBScript中创建ActiveX对象不需要Server

#10

awke0022008-09-20 09:03

今天开始学习Fso这个东东。。。

#11

tianxiadiyicai2008-09-21 10:29

3楼很厉害.