回 帖 发 新 帖 刷新版面

主题:scripting.filesystemobject问题

function counter()
    filepath=server.mappath("/count")
    filename=filepath+"\counter.txt"
    set fs=createobject("scripting.filesystemobject")   这里出错的!
    set f=fs.getfile(filename)
    Set ts = f.OpenAsTextStream(1, -2)
    s=ts.readline
    for i=1 to len(s)
       response.write "<img src=images/count/"&mid(s,i,1)&".gif width=18 height=22>"
    next
    ts.close
end function
错误类型:
Microsoft VBScript 运行时错误 (0x800A0035)
文件未找到

回复列表 (共3个回复)

沙发

set fs=createobject("scripting.filesystemobject")   这里出错的!
改成 set fs=server.createobject("scripting.filesystemobject")   这里出错的!

板凳


set f=fs.getfile(filename)
这里出错的 不是那个问题

文件找不到!
谢谢再看看

3 楼

文件未找到-----------
filename=filepath+"\counter.txt"
可以先将filename输出来看看是什么?检查一下文件路径是否正确。

我来回复

您尚未登录,请登录后再回复。点此登录或注册