请问错在哪

yijiang 2003-08-19 11:14:49
<%
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("d:\test\aspcounter.txt")
counter= Clng(a.ReadLine)
counter = counter + 1
a.close
Set a = fs.OpenTextFile("d:\test\aspcounter.txt")
a.WriteLine(counter)
a.Close
Set a=nothing
Set fs=nothing
%>
现已点击: <% =ct %> 次

运行时出错, a.WriteLine(counter)

请问为什么.谢谢

...全文
60 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
yijiang 2003-08-19
  • 打赏
  • 举报
回复
计数器程序.

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧