<%
Dim Item
%>
<!-- Show greeting using selected server variables -->
Hello visitor from <%= Request.ServerVariables("REMOTE_ADDR") %>! Your
browser identifies itself as <%= Request.ServerVariables("HTTP_USER_AGENT") %>.
<BR>
<BR>
<!-- Show all server variables -->
<TABLE BORDER=2>
<TR>
<TD><B>Server Variable</B></TD>
<TD><B>Value</B></TD>
</TR>
<% For Each Item In Request.ServerVariables %>
<TR>
<TD><FONT SIZE="-1"><%= Item %></FONT></TD>
<TD><FONT SIZE="-1"><%= Request.ServerVariables(Item) %> </FONT></TD>
</TR>
<% Next %>
</TABLE>
<% ' That's It! Another cool time when a few lines of code go a long way! %>;