ASP FS.OpenTextFile不能进行文件写入操作

运行下面的代码，可以对文件进行读的操作，但是进行写操作，就会返回错误。
<%
Set FS=Server.CreateObject("Scripting.FileSystemObject")
Set RS=FS.OpenTextFile(Server.MapPath("counter.txt"),1, False)
fcount=RS.ReadLine
RS.Close
fcount=fcount+1

Set RS=FS.OpenTextFile(Server.MapPath("counter.txt"), 2,False)
RS.WriteLine(fcount)
RS.Close
Set RS=Nothing
Set FS=Nothing
%>

可能原因有很多：

1、文件夹的权限：增加User用户权限，但是如果用管理员登录的话，一般不会存在这个问题

2、IIS 服务器设置问题：应用程序池的问题因为系统是64位的，应用有32位应用程序：

找到IIS应用程序池，“设置应用程序池默认属性”->“常规”->”启用 32 位应用程序”，设置为 True。

 再在浏览器上查看，代码可以正常执行。