<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
%>
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
更新日志
- 魏新雨《为你祈祷+新歌精逊2CD[WAV]
- 影心、明萨拉你选哪个?国外美女COS《博德3》
- 澳洲女子骑车跌入“自杀树”丛 疼痛持续9个月崩溃
- 育碧公布2024“她创力”计划:为女性游戏人提供辅导
- 刘美君.2017-千色·30总选3CD【环球】【WAV+CUE】
- 群星.2022-星河长明电视原声带【乐有奇思】【FLAC分轨】
- 陈淑桦.1995-淑桦盛开Forever【滚石】【WAV+CUE】
- 《再来一张》评测:出师成败皆系“赌”
- 《银河汉堡店》测评:我是银河走菜王!
- 《末日地带2》评测:酣畅淋漓的“和面”之旅
- 萧煌奇《没事的》[320K/MP3][96.22MB]
- 萧煌奇《没事的》[FLAC/分轨][263.38MB]
- 群星《音你而来 第6期》[320K/MP3][90.61MB]
- 交错战线爬塔攻略一览
- 战锤40K星际战士2全近战武器使用教学|近战武器连招表