<%@ Page Language="vb" %>
Showing QueryString values via the QueryString Collection in ASP.NET
<%
Dim Counter1, Counter2 As Integer
Dim Keys(), subKeys() As String
Dim queryStringCollection As NameValueCollection
queryStringCollection=Request.QueryString
Keys = queryStringCollection.AllKeys
For Counter1 = 0 To Keys.GetUpperBound(0)
Response.Write("Key: " & Keys(Counter1) & "
")
subKeys = queryStringCollection.GetValues(Counter1)
For Counter2 = 0 To subKeys.GetUpperBound(0)
Response.Write("Value " & CStr(Counter2) & ": " & subKeys(Counter2) & "
")
Next Counter2
Next Counter1
%>