ASP所有的Session變數擷取實現代碼

來源:互聯網
上載者:User

複製代碼 代碼如下:Dim strName, iLoop
For Each strName in Session.Contents
Response.Write strName & " - " & Session.Contents(strName)& "[BR]"
Next

一般情況下,上面的代碼可以工作得很好。但當Session變數是一個對象或者數組時,列印的結果就不正確了。 這樣我們修改代碼如下: 複製代碼 代碼如下:'首先看看有多少Session變數在使用?
Response.Write "There are " & Session.Contents.Count & _
" Session variables<P>"
Dim strName, iLoop
'使用For Each迴圈察看Session.Contents
'如果Session變數是一個數組?
If IsArray(Session(strName)) then
'迴圈列印數組的每一個元素
For iLoop = LBound(Session(strName)) to UBound(Session(strName))
Response.Write strName & "(" & iLoop & ") - " & _
Session(strName)(iLoop) & "<BR>"
Next
Else
'其他情況,就簡單列印變數的值
Response.Write strName & " - " & Session.Contents(strName) & "<BR>"
End If
Next

Session變數有時候不能工作,為什嗎? 有很多可能性:第一,如果用戶端不允許cookie操作,session將失效。因為session是依賴於cookie的。第二,session有失效時間的設定。預設的設定是20分鐘。你可以這樣修改它:Web directory -> Properties -> Virtual directory -> Application settings -> Configuration -> App Options -> Session timeout 或者在ASP中,寫上這樣的代碼:Session.timeout=60 。第三,session是和具體的Web Application相關的。如果使用者從/products/default.asp瀏覽到/jobs/default.asp,也可能造成session的重新建立。 怎麼清除一個不再需要的session變數但不使session失效? 在ASP3.0中: Session.Contents.Remove "變數名" 可以清除一個變數。在ASP2.0中: set session("變數名")=NULL 可以清除變數。在ASP3.0中, Session.Contents.RemoveAll 可以清除所有的session變數和session.abandon不同,上面的方法都不會使目前的session到期或者無效。 ASP頁面頂端的是什麼意思? IIS使用一種叫做Session跟蹤的技術,來保證各個Session變數在每個頁面是可用的。當使用者訪問某個ASP頁面時候,IIS會首先為這個頁面準備好各個Session變數,這當然會帶來效能上的影響。(使用Session變數的代價總是很高的!) 如果你有100個頁面,而只有5個頁面用到了Session,那麼,為了整體的效能,你只需要在那5個版面設定: 複製代碼 代碼如下:<%@ ENABLESESSIONSTATE=True %>

而其他版面設定為: 複製代碼 代碼如下:<%@ ENABLESESSIONSTATE=False %>

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.