下列代码保存为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>