[求助]我写了一个文本计数器,调不通,望高手指点迷津
以下上我写的代码 文本计数器(txtcounter.asp)
<html><body>
<%coutfile=server.mappath("txtcounter.txt")
set myfile=createobject("scripting.filesystemobject")
set mytext=myfile.opentextfile(coutfile,1,false,false)
visitor=mytext.readline
visitor=visitor+1
myvisit=visitor
set mytext=myfile.createtextfile(coutfile,true,false)
mytext.writeline(visitor)%>
你是第<%=myvisit%>位来访者。
</body></html>
另外txtcounter.txt 内容为 84,我也将txtcounter.asp和txtcounter.txt放在同一目录下,可是最终在IE地址拦输入后出现如下:
---------------------------------------------------------------------------
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Microsoft VBScript 运行时错误
没有权限
/ASPCODE/CH10/txtcounter.asp,行8 -------------------------------------------------------------------------- 我是菜鸟,请各位高手指正,上面错误提示的东西我也不明白,到底是什么意思呀? 开始我以为“没有权限”指的是FSO权限,但我也在 开始-“运行”中执行regsvr32.exe scrrun.dll命令,打开FSO权限了呀,为什么还是不行?到底怎么回事呢?迷糊中.......
[此贴子已经被作者于2005-5-3 2:05:33编辑过]