0

我正在尝试在 HTML 页面上的 VBScript 中创建一个命中计数器，以满足特定的客户需求。我不能使用任何免费提供的命中计数器。

我的问题是我的代码只能在我的笔记本（本地 C:\ 驱动器）上找到文本文件，而不是在网站上，即使该文件确实存在。我的另一个问题是，当页面代码到达该server.creatobject行时，我收到错误消息Microsoft VBScript runtime error: Object required: 'server'。

我主要用 VB 编写，但客户想要一个特定的 HTML 页面而不是 ASP/ASPX。有人能帮助我吗？我已经尝试了一段时间，无法对我的上述问题得到一个体面的答案。

下面是代码。

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Dim fso
dim tso
dim FilObject
dim VisitorCount
dim strOutputName
dim objOutputfile
strfilename ="counter.txt"

set fso=server.createobject("scripting.filesystemobject")


set filobject=fso.getfile(strfilename)
set tso=filobject.openastextstream

visitorcount=clng(tso.readall)
visitorcount=visitorcount + 1
stroutputname=strfilename
set objoutputfile=fso.createtextfile(stroutputname,true)

objoutputfile.writeline visitorcount

document.write(visitorcount)
</script>
4

1 回答 1

0

...客户端想要一个特定的 HTML 页面而不是 ASP

但是您已经编写了一个 ASP 脚本（runat="server"使用 VBScript 脚本语言）。该Server对象仅在 ASP 中可用。您的文件将需要是一个.asp文件（或以某种方式由服务器作为 ASP 处理），否则您的脚本将作为客户端 VBScript 运行，并且该Server对象将不可用，这是您似乎遇到的错误。

于 2012-09-12T18:03:20.447 回答