<%@ language=VBScript %> Ron Glotzbach's Web Site 
	<html>
	<head>
	  <title>Display a List of Server Variables and Values</title>
	</head>

	<body>

	<table width="500" cellpadding="2" cellspacing="2" border="2">

	<%
	'This lists the names of the server variables and the values in a table
	
	'Loop through each variable in ServerVariables
	'ServerVariables are stored in the Request object
	For Each Item in Request.ServerVariables
		
	  'Write the opening table row tag and carriage return
	  Response.Write("  <tr>" & chr(13))
		
	  'Write the name of the server variable
	  Response.Write("    <td>" & Item & "</td>" & chr(13))
		
	  'Write the value of the server variable
	  Response.Write("    <td>" & Request.ServerVariables(Item) & "</td>" & chr(13))
		
	  'Write the closing table row tag and carriage return
	  Response.Write("  </tr>" & chr(13))

	Next
	%>

	</table>

	</body>
	</html>