Programmingsiteチュートリアル

このコードの断片を表示する方法を表示する方法
多くのアクティブユーザーがお客様のサイトでは、この非常にされ
インターネット上で広く使用されます。

お好みのテキストエディタを使用して作成
Global.asaをして、コードの下のファイルを入力してください

<SCRIPT LANGUAGE=VBScript RUNAT =サーバー

サブApplication_OnStart

アプリケーション（ "訪問" ） = 0
アプリケーション（ " " ） =アクティブ0
エンドサブ

サブApplication_OnEnd
サブSession_OnStart

' 20分に設定タイムアウト
Session.Timeout = 20
セッション（ "スタート" ） =今すぐ
' 1増加数が
にApplication.Lock
アプリケーション（ "訪問" ） =申込書（ "訪問" ） + 1
intTotal_visitors =申込書（ "訪問" ）
Application.UnLockを
セッション（ " VisitorID " ） = intTotal_visitors
にApplication.Lock
アプリケーション（ " " ） =申込書（ " " ）アクティブ+ 1アクティブ
Application.UnLockを

エンドサブ

Session_OnEnd
1 'の減少時にセッションを終了
にApplication.Lock
アプリケーション（ " " ） =申込書（ " " ）アクティブ- 1アクティブ
Application.UnLockを
エンドサブ
< /スクリプト>

今では1ページに以下のカウントに追加
アクティブユーザー

<b>ダウンロード< ％ =セッション（ " VisitorID ")%></ b >
訪問（秒）
<b>ダウンロード< ％ =申込書（ "アクティブ")%></ b >
訪問者のオンライン

ブックマークに

非表示サイト

関連記事：

1. ASPでアクティブユーザー このコードスニペットを表示する方法を示し、多くの方法を積極的...

関連する記事はまだもう1つの関連するプラグインを投稿しました 。