列出asp+中所有request 的属性和数值

/*
豆腐制作都是精品
http://www.asp888.net 豆腐技术站
如转载请保留这个版权信息
*/
呵呵，这个程序大家看看就可以了

 1<script language="VB" runat="server">   
 2Sub Page_Load(Src As Object, E As EventArgs)   
 3Dim loop1 as long   
 4Dim loop2 As long   
 5Dim arr1(), arr2() As String   
 6Dim coll As NameValueCollection   
 7coll =Request.ServerVariables   
 8arr1 = coll.AllKeys   
 9For loop1 = 0 To UBound(arr1)   
10arr2 = coll.GetValues(arr1(loop1))   
11Response.Write("名称：<font color=blue>" & arr1(loop1) & "</font> 值: <font color=red>" & arr2(0) & "</font><br>")   
12Next loop1   
13end sub   
14</script>

作者:豆腐()