ASP.NETでのアクセスカウンター導入方法
どうぞよろしくお願いします。
現在、ASP.NETでホームページを作成しておりますが、
旧来、aspで使用していたアクセスカウンターが動きません。set代入ステートメントはサポートされてませんというエラーが出ます。
以下ソースなのですが、簡単な修正で使うことはできますか？
また、aspのフリーアクセスカウンターはネット上にたくさんありますが、asp.NETのものがあるサイトがありましたら教えてください。
よろしくお願いします。
<%
Set ObjFSO = Server.CreateObject("Scripting.FileSystemObject")
filename = Server.MapPath("data/count.dat")
'カウンタファイルを読み取り専用で開きます。
Set ObjTS = ObjFSO.OpenTextFile(filename,1,True)
'カウンタ値を取得します。
If ObjTS.AtEndOfStream Then
cnt = 0
Else
cnt = ObjTS.ReadLine
End If
'ファイルを閉じます。
ObjTS.Close
'カウンタ値を加算します。
cnt = cnt + 1
'カウンタファイルを上書きモードで開きます。
Set ObjTS = ObjFSO.OpenTextFile(filename,2,True)
'ファイルにカウンタ値を書き込みます。
ObjTS.WriteLine cnt
'ファイルを閉じます。
ObjTS.Close
'カウンタ値を表示します。
Response.Write "現在までのアクセス数：" & cnt
'オブジェクトを解放します。
Set ObjTS = Nothing
Set ObjFSO = Nothing
%>
![その他([技術者向] コンピューター) イメージ](https://gazo.okwave.jp/okwave/spn/images/related_qa/c205_3_thumbnail_img_sm.png)
お礼
ご回答 ありがとうございます。 大変失礼しました。 SSI→すべて IISの間違えでした。 ＩＩＳ６．０に対応しているか、確認してみます。
補足
実は、おはなししてよいか、ですが、 http://www.yasch.com/asp/frame.asp?viewurl=software.html の ＧＩＦ画像を使ったカウンタなのです。 ＩＩＳ６．０もアンインストールしましたが、動きがないようです。 なんとかしたいです。いままでうごいていたのに。