ASP プログラムでは、同じユーザーが同時に 2 回ログインすることはできません。

ログインページのlogin.asp:

<%
request.Form.count>0 の場合
session("ユーザー名")=リクエスト("ユーザー名")
application(session("username"))=session.SessionID
応答.Redirect("index.asp")
終了する場合
%>
<form method=post action="">
<input type="text" name="ユーザー名"><input type="submit">
</form>

認証が必要なその他のページindex.asp:

<%
if application(session("username"))=session.SessionID then
response.Write("すでにログインしています")
それ以外
response.Write("ログインしていません")
終了する場合
%>