Contents

(PWS4 IIS4 IIS5)
Contents — スクリプト コマンドによってセッションに追加された項目が含まれます。

Session.Contents( Key )

パラメータ
Key 取得するプロパティの名前です。

説明

Session.Contents コレクションには、あるセッションで タグを使用せずに確立された項目すべてが含まれます。Session.Contents コレクションを使用すると、セッションの特定の項目の値を調べたり、コレクションに対して繰り返し処理を行って、セッションのすべての項目の一覧を取得したりすることができます。

ループ制御構造を使用すると、Contents コレクションのすべての要素を対象として繰り返し処理を行うことができます。このスクリプト例を次に示します。

例1.Contentsの例

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
<%@ LANGUAGE="VBSCRIPT" %>
<%
  Dim sessitem
  Dim anArray(2)
  response.write "SessionID: " & Session.SessionID & "<p>"

  anArray(0)="one"
  anArray(1)="second"
  anArray(2)="third"
  Session("anArray")=anArray
  Session("scalar")="1234567890ABCDEFG"

  set objConn=server.createobject("adodb.connection")
  set Session("object")=objConn

  response.write "List of " & Session.Contents.Count & " items in Session " & _
  "contents collection:<hr />"
  For Each sessitem in Session.Contents
    If IsObject(Session.Contents(sessitem)) Then
      Response.write(sessitem & " : Session object cannot be displayed." & "<br />")
    Else
      If IsArray(Session.Contents(sessitem)) Then
         Response.write "Array named " & Session.Contents(sessitem) & "<ol>"
         For each objArray in Session.Contents(sessitem)
             Response.write "<li>" & _
             Session.Contents(sessitem)(objArray)& "<br />"
         Next
             Response.write "</ol>"
      Else
             Response.write(sessitem & " : " & Session.Contents(sessitem) & "<br />")
       End If
    End If
  Next
%>

Application オブジェクト も参照ください。

Post a comment