一般來說，在實際開發中，對于 Session 對象使用最多的就是用戶登錄部分了，這個案例將簡單模擬一個用戶登錄表單、用戶是否登錄的判斷以及用戶退出的一系列功能，它一共分了以下幾個頁面。

Login.asp (用戶登錄)、Check.asp (用戶是否已經登錄判斷)、Logout.asp (用戶退出)

Login.asp 用戶登錄部分

我們將要完成用戶登錄表單的顯示，以及提交后，對于用戶輸入密碼的判斷和寫 Session 的操作，主要代碼如下:

<% Dim sPassword '判斷是否POST提交單表，開始登錄 If UCase(Request.ServerVariables("REQUEST_METHOD")) = "POST" Then'提交表單登錄，判斷密碼 sPassword = Trim(Request.Form("password"))If sPassword = "123456" Then Session("password") = "123456"Response.Write("<h3>您已經登錄成功！請訪問<a href=""Check.asp"">登錄檢查文件</a></h3>")ElseResponse.Write("<h3>您輸入的密碼有誤！</h3>")'Response.End()End If Else'顯示表單，讓用戶登錄 %><form method="post" action="">請輸入密碼：<input name="password" type="text"/><input type="submit" value="提交"/></form> <% End If %>

運行效果如下：

登錄成功，顯示如下：

Check.asp 登錄判斷部分

用來檢查用戶 Session，從而判斷是否已經登錄，主要代碼如下：

<% Dim sPassword sPassword = Trim(Session("password")) if sPassword = "" ThenResponse.Write("<h3>您還沒有登錄呢，請訪問<a href=""Login.asp"">登錄表單</a></h3>") Else Response.Write("<h3>您已經登錄了，可以訪問<a href=""Logout.asp"">退出頁面</a></h3>") End If %>

如果成功登錄顯示：

如果沒有登錄顯示：

Logout.asp 用戶退出部分

通過 Session 的 Remove 方法來清空 Cookies，從而實現用戶的退出。主要代碼如下：

<% Session.Contents.Remove("password") Response.Write("<h3>成功退出，可以訪問<a href=""Login.asp"">登錄頁面</a></h3>") %>

運行后顯示：

示例代碼下載

SessionLogin.rar

轉載于:https://www.cnblogs.com/pchmonster/p/4731366.html

總結

以上是生活随笔為你收集整理的ASP入门（十一）-Session小案例的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。