ASP.Net/Response/Server Variables

Материал из .Net Framework эксперт
Перейти к: навигация, поиск

Showing ServerVariable values via the ServerVariables Collection (VB.net)

   <source lang="csharp">

<%@ Page Language="vb" %> <html> 

  <head>
     <title>Showing ServerVariable values via the ServerVariables Collection in ASP.NET</title>
  </head>

<body>

<% Dim Counter1, Counter2 As Integer Dim Keys(), subKeys() As String Dim SVarsColl As NameValueCollection SVarsColl=Request.ServerVariables Keys = SVarsColl.AllKeys For Counter1 = 0 To Keys.GetUpperBound(0) 

  Response.Write("Key: " & Keys(Counter1) & "
")
  subKeys = SVarsColl.GetValues(Counter1) " Get all values under this key.
  For Counter2 = 0 To subKeys.GetUpperBound(0)
     Response.Write("Value " & CStr(Counter2) & ": " & subKeys(Counter2) & "
")
  Next Counter2

Next Counter1 %>

</body> </html> 

      </source>
Источник — «http://nfex.ru/index.php?title=ASP.Net/Response/Server_Variables&oldid=2484»