0

特定のクライアントのニーズに合わせて、HTMLページのVBScriptでヒットカウンターを作成しようとしています。無料で利用できるヒットカウンターは使用できません。

私の問題は、ファイルが存在していても、コードがノートブック(ローカルC:\ドライブ)でのみテキストファイルを検出し、Webサイトでは検出しないことです。私の他の問題は、ページコードがserver.creatobject行に到達すると、エラーが発生することMicrosoft VBScript runtime error: Object required: 'server'です。

私は主にVBで書いていますが、クライアントはASP/ASPXではなく特定のHTMLページを望んでいます。誰かが私を助けてくれますか?私はしばらくの間試みてきました、そして私の上記の質問に対するまともな答えを得ることができません。

以下はコードです。

<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

...クライアントは ASP ではなく、特定の HTML ページを必要としています

しかし、( runat="server"VBScript スクリプト言語を使用して) ASP スクリプトを作成しました。オブジェクトはServerASP でのみ使用できます。ファイルはファイルである必要があり.aspます (または、何らかの方法でサーバーによって ASP として処理されます)。そうしないと、スクリプトがクライアント側の VBScript として実行され、Serverオブジェクトが使用できなくなります。これは、発生しているように見えるエラーです。

于 2012-09-12T18:03:20.447 に答える