下列代码保存为ASP文件就可以了

<table border=0 cellpadding=0 cellspacing=1 bgcolor="#d0c0F0">
<tr>
    <td><table border=0 cellpadding=3 cellspacing=0 bgcolor="#F0F0F8">
        <tR bgcolor="#d0c0f0">
         <td><b>Variable Name</b></td>
         <td><b>Value</b></td>
        </tr>
        <%
        With response
            For Each sKey In Request.ServerVariables
                .Write "<tR>" & vbCrLf
                .Write vbTab & "<td valign=""top""><b>" & sKey & "</b></td>" & vbCrLf
                .Write vbTab & "<td>" & Request.ServerVariables(sKey) & "</td>" & vbCrLf
                .Write "</tR>" & vbCrLf
            Next
        End With
        %>
     </table></td>
</tr>
</table>