asp如何检测HTTP表头信息？
时间：2010-06-28 18:20:00
如何侦测HTTP表头信息？
可用下列办法侦测并显示所有的HTTP HEADERS：
<HTML>
<HEAD>
<TITLE> HTTP HEADERS侦测 - www.aspxhome.com< /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 改良版MD5、SHA256多重加密类（二次及多次）
DW MX新功能试用：嵌套模板
简单实现JS计算器功能
onerror图片失效时显示其他图片
Python数学建模学习模拟退火算法多变量函数优化示例解析
分享Python获取本机IP地址的几种方法
如何编写一个高效的国税系统通讯录数据库？
软件测试面试如何测试网页的登录页面
专家教你安装 MySQL的与MySQL GUI Tools
MySQL中从库延迟状况排查的一则案例
python列表推导式入门学习解析
Python Websocket服务端通信的使用示例
用什么库写 Python 命令行程序(示例代码详解)
node.js支持多用户web终端实现及安全方案
Python爬虫如何应对Cloudflare邮箱加密
Python(TensorFlow框架)实现手写数字识别系统的方法
