zoukankan      html  css  js  c++  java
  • 用For Each语句对Session.Contents树组进行遍历

    <%@ LANGUAGE=VBScript codepage ="936" %>
    <% Option Explicit %>
    您的sessionID号是:<%=session.sessionid%><br>
    <%
    Response.Write "在你的程序中一共使用了 " & Session.Contents.Count & " 个Session变量"
    Dim strName, iLoop
    For Each strName in 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
    ElseIf IsObject(Session(strName)) Then
    Response.Write strName & " - 是类<BR>"
    Else
    '如果不是数组,那么直接显示
    Response.Write strName & " - " & Session.Contents(strName) & "<BR>"
    End If
    Next
    %>

  • 相关阅读:
    G
    ZOJ 3782
    23.内存池
    22.boost图模板
    21.boost Ford最短路径算法(效率低)
    20.boost dijkstra最短路径算法
    19.boost A*算法
    18.boost 图的拓扑排序
    17.广度优先遍历bfs
    16.boost图深度优先遍历DFS
  • 原文地址:https://www.cnblogs.com/lykouyi/p/5687883.html
Copyright © 2011-2022 走看看