出来るのだASP Q&A掲示板(過去LOG)  訪問数 52046 昨日 889 今日 776
    【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者

アクセスカウンタ   hhhさん [2004/01/26 18:44:33] [4007]
  Re:アクセスカウンタ   YasNet(管理人)さん [2004/01/26 19:37:48] [4008]
    Re:アクセスカウンタ   hhhさん [2004/01/26 20:22:21] [4010]
      Re:アクセスカウンタ   YasNet(管理人)さん [2004/01/26 21:18:01] [4011]
        Re:アクセスカウンタ   hhhさん [2004/01/27 10:03:34] [4012]
          Re:アクセスカウンタ   hhhさん [2004/01/27 18:06:38] [4014]
            Re:アクセスカウンタ   YasNet(管理人)さん [2004/01/28 9:44:22] [4015]
              Re:アクセスカウンタ   Lightningさん [2004/01/28 17:10:03] [4019]
                Re:アクセスカウンタ   hhhさん [2004/02/09 18:26:17] [4055]
                  Re:アクセスカウンタ   Lightningさん [2004/02/10 9:17:24] [4056]

[4007] アクセスカウンタ
投稿者:hhhさん 2004/01/26 18:44:33
はじめまして。
現在、以下のようなコードを書いてアクセスカウンタを作って
いるのですが、ページがリロードされるたびにカウンタが増える
のでNGだということに気がつきました。
(プログラムの動作上、一人のユーザーが同じページを何度も読
み込む必要があるので・・)

これを回避する良い方法はないでしょうか?

初歩的な質問で恐縮なのですが、教えていただければと思います。
よろしくお願いします。

(ソース)
Application.Lock
Application("access_cnt") = Application("access_cnt") + 1
Application.Unlock

[4008] Re:アクセスカウンタ
投稿者:YasNet(管理人)さん 2004/01/26 19:37:48
こんにちは YasNet(管理人) です。

当サイトソフトウエア集のGIF Counterは参考になりませんか。

それでは 失礼致します。

> はじめまして。
> 現在、以下のようなコードを書いてアクセスカウンタを作って
> いるのですが、ページがリロードされるたびにカウンタが増える
> のでNGだということに気がつきました。
> (プログラムの動作上、一人のユーザーが同じページを何度も読
> み込む必要があるので・・)
>
> これを回避する良い方法はないでしょうか?
>
> 初歩的な質問で恐縮なのですが、教えていただければと思います。
> よろしくお願いします。
>
> (ソース)
> Application.Lock
> Application("access_cnt") = Application("access_cnt") + 1
> Application.Unlock
>

[4010] Re:アクセスカウンタ
投稿者:hhhさん 2004/01/26 20:22:21
レスありがとうございます。

GIF Counterは確かに同一人物によるページ更新をカウントしない
みたいなのでいいのですが、GIFを使う必要はないので(^^;

他にサンプル等ないでしょうか?

それともGIF Counterを参考にして簡単に修正できるでしょうか・・

回答よろしくお願い致します。



> こんにちは YasNet(管理人) です。
>
> 当サイトソフトウエア集のGIF Counterは参考になりませんか。
>
> それでは 失礼致します。
>
> > はじめまして。
> > 現在、以下のようなコードを書いてアクセスカウンタを作って
> > いるのですが、ページがリロードされるたびにカウンタが増える
> > のでNGだということに気がつきました。
> > (プログラムの動作上、一人のユーザーが同じページを何度も読
> > み込む必要があるので・・)
> >
> > これを回避する良い方法はないでしょうか?
> >
> > 初歩的な質問で恐縮なのですが、教えていただければと思います。
> > よろしくお願いします。
> >
> > (ソース)
> > Application.Lock
> > Application("access_cnt") = Application("access_cnt") + 1
> > Application.Unlock
> >

[4011] Re:アクセスカウンタ
投稿者:YasNet(管理人)さん 2004/01/26 21:18:01
こんにちは YasNet(管理人)です。

GIF以外のロジックは単純ですので、解析してみて下さい。

ちょっと、今しっかり説明する時間が取れないので
理解不能な状態でしたら書き込みしてください。

今月は、特にばたばたしているのでこんなレスですみません。・・・いつもか(反省)

それでは 失礼致します。

> レスありがとうございます。
>
> GIF Counterは確かに同一人物によるページ更新をカウントしない
> みたいなのでいいのですが、GIFを使う必要はないので(^^;
>
> 他にサンプル等ないでしょうか?
>
> それともGIF Counterを参考にして簡単に修正できるでしょうか・・
>
> 回答よろしくお願い致します。
>
>
>
> > こんにちは YasNet(管理人) です。
> >
> > 当サイトソフトウエア集のGIF Counterは参考になりませんか。
> >
> > それでは 失礼致します。
> >
> > > はじめまして。
> > > 現在、以下のようなコードを書いてアクセスカウンタを作って
> > > いるのですが、ページがリロードされるたびにカウンタが増える
> > > のでNGだということに気がつきました。
> > > (プログラムの動作上、一人のユーザーが同じページを何度も読
> > > み込む必要があるので・・)
> > >
> > > これを回避する良い方法はないでしょうか?
> > >
> > > 初歩的な質問で恐縮なのですが、教えていただければと思います。
> > > よろしくお願いします。
> > >
> > > (ソース)
> > > Application.Lock
> > > Application("access_cnt") = Application("access_cnt") + 1
> > > Application.Unlock
> > >

[4012] Re:アクセスカウンタ
投稿者:hhhさん 2004/01/27 10:03:34
YasNet様、ご返事ありがとうございます。

できるだけ簡単にアクセスカウンタを実装したいのですが、
(プログラムの他の処理でいっぱいいっぱいなので・・)
GIF Counterは結構複雑そうですよね。。
ソースを見てみましたが挫折しました(^^;

アクセスカウンタだけに集中して時間が取れればいいので
すが、そういうわけにもいかず(泣)

GIFを使う必要はなく、昨日・今日のカウンタも不要なの
で、「ここをこう直したらいい」というのを教えていだけ
れば幸いです。

宜しくお願いします。

> こんにちは YasNet(管理人)です。
>
> GIF以外のロジックは単純ですので、解析してみて下さい。
>
> ちょっと、今しっかり説明する時間が取れないので
> 理解不能な状態でしたら書き込みしてください。
>
> 今月は、特にばたばたしているのでこんなレスですみません。・・・いつもか(反省)
>
> それでは 失礼致します。
>
> > レスありがとうございます。
> >
> > GIF Counterは確かに同一人物によるページ更新をカウントしない
> > みたいなのでいいのですが、GIFを使う必要はないので(^^;
> >
> > 他にサンプル等ないでしょうか?
> >
> > それともGIF Counterを参考にして簡単に修正できるでしょうか・・
> >
> > 回答よろしくお願い致します。
> >
> >
> >
> > > こんにちは YasNet(管理人) です。
> > >
> > > 当サイトソフトウエア集のGIF Counterは参考になりませんか。
> > >
> > > それでは 失礼致します。
> > >
> > > > はじめまして。
> > > > 現在、以下のようなコードを書いてアクセスカウンタを作って
> > > > いるのですが、ページがリロードされるたびにカウンタが増える
> > > > のでNGだということに気がつきました。
> > > > (プログラムの動作上、一人のユーザーが同じページを何度も読
> > > > み込む必要があるので・・)
> > > >
> > > > これを回避する良い方法はないでしょうか?
> > > >
> > > > 初歩的な質問で恐縮なのですが、教えていただければと思います。
> > > > よろしくお願いします。
> > > >
> > > > (ソース)
> > > > Application.Lock
> > > > Application("access_cnt") = Application("access_cnt") + 1
> > > > Application.Unlock
> > > >

[4014] Re:アクセスカウンタ
投稿者:hhhさん 2004/01/27 18:06:38
今気づいたのですが、こちらの掲示板の一番上に「訪問数」って
ありますよね?
こんなかんじにしたいのですが。(昨日・今日は除く)

ページを更新してもカウントアップされないのでいいかんじです。

こちらの掲示板のソースを見せていただくことって、できない
でしょうか・・

無理を言って申し訳ございません。
よろしくお願い致します。


> YasNet様、ご返事ありがとうございます。
>
> できるだけ簡単にアクセスカウンタを実装したいのですが、
> (プログラムの他の処理でいっぱいいっぱいなので・・)
> GIF Counterは結構複雑そうですよね。。
> ソースを見てみましたが挫折しました(^^;
>
> アクセスカウンタだけに集中して時間が取れればいいので
> すが、そういうわけにもいかず(泣)
>
> GIFを使う必要はなく、昨日・今日のカウンタも不要なの
> で、「ここをこう直したらいい」というのを教えていだけ
> れば幸いです。
>
> 宜しくお願いします。
>
> > こんにちは YasNet(管理人)です。
> >
> > GIF以外のロジックは単純ですので、解析してみて下さい。
> >
> > ちょっと、今しっかり説明する時間が取れないので
> > 理解不能な状態でしたら書き込みしてください。
> >
> > 今月は、特にばたばたしているのでこんなレスですみません。・・・いつもか(反省)
> >
> > それでは 失礼致します。
> >
> > > レスありがとうございます。
> > >
> > > GIF Counterは確かに同一人物によるページ更新をカウントしない
> > > みたいなのでいいのですが、GIFを使う必要はないので(^^;
> > >
> > > 他にサンプル等ないでしょうか?
> > >
> > > それともGIF Counterを参考にして簡単に修正できるでしょうか・・
> > >
> > > 回答よろしくお願い致します。
> > >
> > >
> > >
> > > > こんにちは YasNet(管理人) です。
> > > >
> > > > 当サイトソフトウエア集のGIF Counterは参考になりませんか。
> > > >
> > > > それでは 失礼致します。
> > > >
> > > > > はじめまして。
> > > > > 現在、以下のようなコードを書いてアクセスカウンタを作って
> > > > > いるのですが、ページがリロードされるたびにカウンタが増える
> > > > > のでNGだということに気がつきました。
> > > > > (プログラムの動作上、一人のユーザーが同じページを何度も読
> > > > > み込む必要があるので・・)
> > > > >
> > > > > これを回避する良い方法はないでしょうか?
> > > > >
> > > > > 初歩的な質問で恐縮なのですが、教えていただければと思います。
> > > > > よろしくお願いします。
> > > > >
> > > > > (ソース)
> > > > > Application.Lock
> > > > > Application("access_cnt") = Application("access_cnt") + 1
> > > > > Application.Unlock
> > > > >

[4015] Re:アクセスカウンタ
投稿者:YasNet(管理人)さん 2004/01/28 9:44:22
こんにちは YasNet(管理人)です。

> > アクセスカウンタだけに集中して時間が取れればいいので
> > すが、そういうわけにもいかず(泣)
私も時間がほしいです。
昨日も徹夜明けで23時くらいまで仕事でした(泣)

> > GIF Counterは結構複雑そうですよね。。
そですか・・・Function AccessCount()がそのものです。
じっくり見てください。

比べていただくとわかると思いますが
当サイトで公開しているBBSもGIF Counterと同じロジックが組み込まれています。

hhhさん のスキルがわからないので、
これ以上のアドバイスが難しいです。

どこがどうわからないのか・・・
ASPがまったくわからないのなら、ちょっと説明に苦しみます。・・・申し訳ないです。

それでは 失礼致します。

> 今気づいたのですが、こちらの掲示板の一番上に「訪問数」って
> ありますよね?
> こんなかんじにしたいのですが。(昨日・今日は除く)
>
> ページを更新してもカウントアップされないのでいいかんじです。
>
> こちらの掲示板のソースを見せていただくことって、できない
> でしょうか・・
>
> 無理を言って申し訳ございません。
> よろしくお願い致します。
>
>
> > YasNet様、ご返事ありがとうございます。
> >
> > できるだけ簡単にアクセスカウンタを実装したいのですが、
> > (プログラムの他の処理でいっぱいいっぱいなので・・)
> > GIF Counterは結構複雑そうですよね。。
> > ソースを見てみましたが挫折しました(^^;
> >
> > アクセスカウンタだけに集中して時間が取れればいいので
> > すが、そういうわけにもいかず(泣)
> >
> > GIFを使う必要はなく、昨日・今日のカウンタも不要なの
> > で、「ここをこう直したらいい」というのを教えていだけ
> > れば幸いです。
> >
> > 宜しくお願いします。
> >
> > > こんにちは YasNet(管理人)です。
> > >
> > > GIF以外のロジックは単純ですので、解析してみて下さい。
> > >
> > > ちょっと、今しっかり説明する時間が取れないので
> > > 理解不能な状態でしたら書き込みしてください。
> > >
> > > 今月は、特にばたばたしているのでこんなレスですみません。・・・いつもか(反省)
> > >
> > > それでは 失礼致します。
> > >
> > > > レスありがとうございます。
> > > >
> > > > GIF Counterは確かに同一人物によるページ更新をカウントしない
> > > > みたいなのでいいのですが、GIFを使う必要はないので(^^;
> > > >
> > > > 他にサンプル等ないでしょうか?
> > > >
> > > > それともGIF Counterを参考にして簡単に修正できるでしょうか・・
> > > >
> > > > 回答よろしくお願い致します。
> > > >
> > > >
> > > >
> > > > > こんにちは YasNet(管理人) です。
> > > > >
> > > > > 当サイトソフトウエア集のGIF Counterは参考になりませんか。
> > > > >
> > > > > それでは 失礼致します。
> > > > >
> > > > > > はじめまして。
> > > > > > 現在、以下のようなコードを書いてアクセスカウンタを作って
> > > > > > いるのですが、ページがリロードされるたびにカウンタが増える
> > > > > > のでNGだということに気がつきました。
> > > > > > (プログラムの動作上、一人のユーザーが同じページを何度も読
> > > > > > み込む必要があるので・・)
> > > > > >
> > > > > > これを回避する良い方法はないでしょうか?
> > > > > >
> > > > > > 初歩的な質問で恐縮なのですが、教えていただければと思います。
> > > > > > よろしくお願いします。
> > > > > >
> > > > > > (ソース)
> > > > > > Application.Lock
> > > > > > Application("access_cnt") = Application("access_cnt") + 1
> > > > > > Application.Unlock
> > > > > >

[4019] Re:アクセスカウンタ
投稿者:Lightningさん 2004/01/28 17:10:03
想像してみればわかるとおもうけど・・・
まず、ユーザーを特定するにはどうすればいいかを考える
ホストネームとかIPをとれば一発ですね

次に、制限するのだから、これらを保持する必要がある。
クッキーに最終アクセス時間を保持させてもいいし、ファイルにIPなりホストネームと共に保持してもいいね

最後に、それらをみてカウントを増やすかどうかを検討する。

以上でしょ?

[4055] Re:アクセスカウンタ
投稿者:hhhさん 2004/02/09 18:26:17
YasNet様、Lightning様、レスどうもありがとうございます。

返信が大変遅くなってしまってすみません。。

>クッキーに最終アクセス時間を保持させてもいいし、ファイルにIPなりホストネームと共に保持してもいいね

力不足のため、このやり方がわかりません。。
(いろいろ調べてはいるのですが・・)

引き続きご指導いただければと思ってます。
よろしくお願いします。


> 想像してみればわかるとおもうけど・・・
> まず、ユーザーを特定するにはどうすればいいかを考える
> ホストネームとかIPをとれば一発ですね
>
> 次に、制限するのだから、これらを保持する必要がある。
> クッキーに最終アクセス時間を保持させてもいいし、ファイルにIPなりホストネームと共に保持してもいいね
>
> 最後に、それらをみてカウントを増やすかどうかを検討する。
>
> 以上でしょ?

[4056] Re:アクセスカウンタ
投稿者:Lightningさん 2004/02/10 9:17:24
> >クッキーに最終アクセス時間を保持させてもいいし、ファイルにIPなりホストネームと共に保持してもいいね
>
> 力不足のため、このやり方がわかりません。。
> (いろいろ調べてはいるのですが・・)
クッキーに最終アクセスタイムを保存するなら
Response.Cookies("LastAccessTime") = now
でいいし
(読むときはRequest.Cookies("LastAccessTime"))
IPの取得はYasさんのサンプルとかを見れば一目瞭然かと・・・


一応、クッキーナサンプルを・・・
かなり適当でカウントをクッキーに保存してますが、これで1時間ごとにアクセスがあればカウントアップするはず

<%
dim LATime,count

count = 0
if Request.Cookies("count") <> "" then
count = Request.Cookies("count")
LATime = Request.Cookies("LastAccessTime")
end if

response.write "<p>" & LATime
response.write "<p>" & now

if Year(LATime) >= Year(now) then
if Month(LATime) >= Month(now) then
if Day(LATime) >= Day(now) then
if hour(LATime) >= hour(now) then
else
count = count + 1

response.Cookies("count") = count
response.Cookies("LastAccessTime") = now
end if
end if
end if
end if
response.write count
%>



TreeBBS For ASP V.0.1.3
Program By YasNet