当前位置：首页 > 资讯 > 技术文档

如何侦测HTTP表头信息？

时间：2020-02-25 11:04 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何侦测HTTP表头信息？

<html> <head> <title> 千花飞舞之HTTP headERS侦测< /title> </head> <body> <TABLE BORDER=1> <tr><td VALIGN=TOP><B>变量</B></td> <td VALIGN=TOP><B>值</B></td></tr> <% For Each key In Request.ServerVariables %> <tr> <td><% = key %></td> <td> <% If Request.ServerVariables(key) = "" Then If GetAttribute(key) = "" Then Response.Write " " Else Response.Write GetAttribute(key) End If Else Response.Write Request.ServerVariables(key) End If Response.Write "</td>" %> </tr> <% Next %> </TABLE> </body></html>

<% Function GetAttribute(AttrName) Dim AllAttrs Dim RealAttrName Dim Location Dim Result AllAttrs = Request.ServerVariables("ALL_HTTP") RealAttrName = AttrName Location = instr(AllAttrs, RealAttrName & ":") If Location <= 0 Then GetAttribute = "" Exit Function End If Result = mid(AllAttrs, Location + Len(RealAttrName) + 1) Location = instr(Result, chr(10)) If Location <= 0 Then Location = len(Result) + 1 GetAttribute = left(Result, Location - 1) End Function %>

全部评论(0)

上一篇：如何使图象随机显示？
下一篇：asp 一些支付接口

资讯排行榜
更多>>