高校问答战争雷霆 科技树:这段程序有问题吗？提示visitors=visitors+1这一行错误
来源：百度文库 编辑：高校问答 时间：2024/05/02 15:51:04
Microsoft VBScript 运行时错误 错误 '800a000d' 类型不匹配: '[string: ""]'
<%whichfile=server.mappath("include/count.txt")
Set fs=CreateObject("Scripting.FileSystemObject")
Set thisfile=fs.opentextfile(whichfile)
visitors=thisfile.readline
thisfile.close
countlen=len(visitors)
for i=1 to countlen
response.write mid(visitors,i,1)
next
visitors=visitors+1
set out=fs.createtextfile(whichfile)
out.writeline(visitors)
out.close
set fs=nothing
%>
<%whichfile=server.mappath("include/count.txt")
Set fs=CreateObject("Scripting.FileSystemObject")
Set thisfile=fs.opentextfile(whichfile)
visitors=thisfile.readline
thisfile.close
countlen=len(visitors)
for i=1 to countlen
response.write mid(visitors,i,1)
next
visitors=visitors+1
set out=fs.createtextfile(whichfile)
out.writeline(visitors)
out.close
set fs=nothing
%>
程序没问题，看看count.txt这个文件
你用了visitors=thisfile.readline，那么visitors这个变量里存放应该是一个或者一串字符
而visitors=visitors+1这个语句意思是对visitors进行增1，是对数值型变量的操作，字符和数值型变量当然不能混为一谈进行操作了
你的错误提示也告诉你了，visitors是String型变量，你有怎么能对字符串型的变量进行数值操作呢？
后缀该为exe