appl_path = "D:\web\123123.txt"
Content = GetFileText(appl_path)
Function GetFileText(ByVal FileDir)
If IsFileExists(FileDir) Then
Dim F
Set F=Fso.OpenTextFile(FileDir)
GetFileText=F.ReadAll
Set F=Nothing
Else
GetFileText=False
End If
End Function
正常 只能读取IIS指定的WEB目录内的TXT文件
现在想读取其他文件夹如 D:\ABC\ABB\ACC.txt 也许是权限问题吧 读取不
到 改怎么处理 ACC.TXT 不可移动 尽量不要将ABB文件夹暴露出来该怎么做?
參考答案:我们将要操纵的计算机文件系统,在这里是指位于web服务器之上。所以,确认你对此拥有合适的权限。理想情况下,你可以在自己的机器上建立一个web服务器,这样就能方便地进行测试。
为了能打开文件,FSO需要实际的文件路径,而不是web路径。比如,是c:inetpubwwwroot empindex.html, 而不是 或者 /temp/index.html。