急求救：Microsoft VBScript 运行时错误 错误 '800a000d' 类型不匹配: '[string: ""]'

正在使用的计数器突然出现错误，显示如下：

Microsoft VBScript 运行时错误 错误 '800a000d'
类型不匹配: '[string: ""]'
/count.asp，行 35

具体的源文件如下：

<%
'Option Explicit

Dim fs, Filename, txt, Content, counterLenth, displayMode
counterLenth=7 '设置显示数据的最小长度，如果小于实际长度则以实际长度为准
displayMode = 2 '设置显示模式,1为文字，2为图片

Filename=Server.MapPath("count.txt")
Set fs=Server.CreateObject("Scripting.FileSystemObject")

'初始化
function init()

'用Application缓存数据
if Application("Counter")="" then
'检查文件是否存在，不存在则创建，并写入0
If Not fs.FileExists(Filename) Then
fs.CreateTextFile Filename,True,True
Set txt=fs.OpenTextFile(Filename,2,True)
txt.Write 0
txt.close()
set txt=nothing
End If
'缓存为空，则读取文本数据
Set txt=fs.OpenTextFile(Filename,1,1)
If txt.AtEndOfStream Then
Applic

金山游侠V安装问题，急求救 简单题：v++求救 急！急！急！求救：我看电影时，老是自动跳出一个空的IE-microsoft Internet Explorer 太阁立志V求救 罪恶都市v点任务求救 罪恶都市V点任务求救 求救!求救!求救!microsoft update 的严重问题! 急Microsoft Office 2003 打不开 Microsoft office, 急! Microsoft Excel问题,急!