（在说正事之前，我要推荐一个福利：你还在原价购买阿里云、腾讯云、华为云服务器吗？那太亏啦！来这里，新购、升级、续费都打折，能够为您省60%的钱呢！2核4G企业级云服务器低至69元/年，点击进去看看吧>>>)
下列代码保存为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>