صفحة تسجيل الدخول login.asp:
<%
إذا request.Form.count>0 ثم
جلسة ("اسم المستخدم") = طلب ("اسم المستخدم")
application(session("اسم المستخدم"))=session.SessionID
استجابة.إعادة توجيه("index.asp")
نهاية إذا
%>
<طريقة النموذج=إجراء ما بعد = "">
<نوع الإدخال = "نص" اسم = "اسم المستخدم"> <نوع الإدخال = "إرسال">
</form>
الصفحات الأخرى التي تتطلب المصادقة Index.asp:
<%
إذا كان application(session("username"))=session.SessionID إذن
استجابة.اكتب ("تم تسجيل الدخول بالفعل")
آخر
استجابة.اكتب ("لم يتم تسجيل الدخول")
نهاية إذا
%>