主题:  FSO很奇怪的问题。急!!

guweichen

职务:普通成员
等级:1
金币:0.0
发贴:6
#12004/12/1 7:43:20
小弟在win2000下,写了个FSO的写文件操作,很简单的几句
set fso = server.createobject(system.filesystemobject)
Set ts = fso.OpenTextFile(....)
ts.write("abcd")
ts.close
很奇怪的是,文件可以读,但是就是无法写入,我已经把文件security改成full control了,还是不行,系统也不报permission denied错误.是正常运行到程序结束,但是文件里就是没有写入的数据。
希望有经验的DX给指点一把,很急,明天就要交活了,这个问题哪里也查不到。



蓝鲸

职务:版主
等级:5
金币:42.1
发贴:2614
#22004/12/1 10:16:21
虚拟目录是否有写入的权限


非常大鱼

guweichen

职务:普通成员
等级:1
金币:0.0
发贴:6
#32004/12/1 12:34:10
没建什么虚拟目录,就放在wwwroot下,默认的情况,
就在win2000里把该文件改成full control其他没有做任何配置
大哥,有解决办法么?我现在很困惑!



janlay

职务:管理员
等级:7
金币:28.0
发贴:7244
#42004/12/1 13:09:39
Const ForWriting=2
Set ts = fso.OpenTextFile(Server.MapPath("myfile.txt"),ForWriting,True)



guweichen

职务:普通成员
等级:1
金币:0.0
发贴:6
#52004/12/1 23:11:52
我的程序是这样写的,已经有story.txt在wwwroot目录下,而且security已经改成了full control, 可以执行到文件结束,但是story.txt里没有"come here"的信息.也没有什么提示出错信息.所以觉得很奇怪,是不是什么地方配置错误?(IIS是新安装的没做什么配置,都是初始指)

<% @Language = "VBScript" %>
<%
Set fso=Server.CreateObject("Scripting.FileSystemobject")
textfile1=Server.MapPath("story.txt")
set cnrs=fso.OpenTextFile(textfile1,2)
cnrs.writeline "come here"
cnrs.Close
%>



guweichen

职务:普通成员
等级:1
金币:0.0
发贴:6
#62004/12/1 23:14:13
补充一点,
如果
set cnrs=fso.OpenTextFile(textfile1,2)
a = cnrs.ReadLine
response.write a
可以看到文件里的内容.就是说读是正常的.



guweichen

职务:普通成员
等级:1
金币:0.0
发贴:6
#72004/12/1 23:30:42
哦,赫赫,这个问题解决了
原来还是要设置wwwroot写权限的.



guweichen

职务:普通成员
等级:1
金币:0.0
发贴:6
#82004/12/1 23:31:41
谢谢版主和janlay