站长资源网络编程

如何侦测HTTP表头信息?

整理:jimmy2025/4/21浏览2
简介 千花飞舞之HTTP headERS侦测< /title></head><body><TABLE BORDER=1><tr><td VALIGN=TOP><B>变量</B></td><td VALIGN=TOP><B>值</B></td></tr><% For</div> <div class="news_infos"><div id="MyContent"><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><html></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><head></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><title> 千花飞舞之HTTP headERS侦测< /title></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"></head></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><body></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><TABLE BORDER=1></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><tr><td VALIGN=TOP><B>变量</B></td></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><td VALIGN=TOP><B>值</B></td></tr></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><% For Each key In Request.ServerVariables %></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><tr></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><td><% = key %></td></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><td></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><%</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">If Request.ServerVariables(key) = "" Then</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">If GetAttribute(key) = "" Then</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Response.Write " " </P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Else</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Response.Write GetAttribute(key)</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">End If</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Else </P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Response.Write Request.ServerVariables(key)</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">End If</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Response.Write "</td>"</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">%></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"></tr></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><% Next %></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"></TABLE></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"></body></html></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"> <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p></P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><% </P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Function GetAttribute(AttrName)</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Dim AllAttrs</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Dim RealAttrName</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Dim Location</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Dim Result</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">AllAttrs = Request.ServerVariables("ALL_HTTP")</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">RealAttrName = AttrName</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Location = instr(AllAttrs, RealAttrName & ":")</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">If Location <= 0 Then</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">GetAttribute = ""</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Exit Function</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">End If</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Result = mid(AllAttrs, Location + Len(RealAttrName) + 1)</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">Location = instr(Result, chr(10))</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">If Location <= 0 Then Location = len(Result) + 1</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">GetAttribute = left(Result, Location - 1)</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt">End Function</P><P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"> %></P></div> </div> </div> <div class="share"> </div> <div class="nextinfo"> <p>上一篇:<a href="/3g/1/163814.html" title="如何提高Request集合的使用效率?">如何提高Request集合的使用效率?</a></p> <p>下一篇:<a href="/3g/1/163816.html" title="如何处理包含javascript语句时的间隔符?">如何处理包含javascript语句时的间隔符?</a></p> </div> <div class="otherlink"> <h2>最新资源</h2> <ul> <li><a href="/3g/1/623703.html" title="群星《奔赴!万人现场 第2期》[FLAC/分轨]">群星《奔赴!万人现场 第2期》[FLAC/分轨]</a></li> <li><a href="/3g/1/623702.html" title="群星《奇妙浪一夏 (上海迪士尼度假区音乐">群星《奇妙浪一夏 (上海迪士尼度假区音乐</a></li> <li><a href="/3g/1/623701.html" title="群星《奇妙浪一夏 (上海迪士尼度假区音乐">群星《奇妙浪一夏 (上海迪士尼度假区音乐</a></li> <li><a href="/3g/1/623700.html" title="【古典音乐】詹姆斯·高威《季节》1993[WA">【古典音乐】詹姆斯·高威《季节》1993[WA</a></li> <li><a href="/3g/1/623699.html" title="贝拉芳蒂《卡里普索之王》SACD[WAV+CUE]">贝拉芳蒂《卡里普索之王》SACD[WAV+CUE]</a></li> <li><a href="/3g/1/623698.html" title="小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE">小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE</a></li> <li><a href="/3g/1/623697.html" title="群星《欢迎来到我身边 电影原声专辑》[32">群星《欢迎来到我身边 电影原声专辑》[32</a></li> <li><a href="/3g/1/623696.html" title="群星《欢迎来到我身边 电影原声专辑》[FL">群星《欢迎来到我身边 电影原声专辑》[FL</a></li> <li><a href="/3g/1/623695.html" title="雷婷《梦里蓝天HQⅡ》 2023头版限量编号低">雷婷《梦里蓝天HQⅡ》 2023头版限量编号低</a></li> <li><a href="/3g/1/623694.html" title="群星《2024好听新歌42》AI调整音效【WAV分">群星《2024好听新歌42》AI调整音效【WAV分</a></li> </ul> </div> </div> <div class="sidebar"> <div class="cloud"><h2 class="hometitle">标签云</h2><ul><a href="/search.asp?key=1080P高清&m=1">1080P高清<span>(5)</span></a><a href="/search.asp?key=高清电影&m=1">高清电影<span>(5)</span></a><a href="/search.asp?key=百度云盘&m=1">百度云盘<span>(5)</span></a><a href="/search.asp?key=网盘下载&m=1">网盘下载<span>(4)</span></a><a href="/search.asp?key=破解软件&m=1">破解软件<span>(4)</span></a><a href="/search.asp?key=绿色软件&m=1">绿色软件<span>(4)</span></a><a href="/search.asp?key=磁力链接&m=1">磁力链接<span>(3)</span></a><a href="/search.asp?key=强度天梯&m=1">强度天梯<span>(3)</span></a><a href="/search.asp?key=福利资源&m=1">福利资源<span>(2)</span></a><a href="/search.asp?key=王者荣耀&m=1">王者荣耀<span>(2)</span></a><a href="/search.asp?key=黑钻活动&m=1">黑钻活动<span>(2)</span></a><a href="/search.asp?key=WPS会员&m=1">WPS会员<span>(2)</span></a><a href="/search.asp?key=刷图排行&m=1">刷图排行<span>(1)</span></a><a href="/search.asp?key=网盘限速&m=1">网盘限速<span>(1)</span></a><a href="/search.asp?key=鬼灭之刃&m=1">鬼灭之刃<span>(1)</span></a><a href="/search.asp?key=免费韩国漫画&m=1">免费韩国漫画<span>(1)</span></a><a href="/search.asp?key=宫本重做&m=1">宫本重做<span>(1)</span></a><a href="/search.asp?key=免费动漫&m=1">免费动漫<span>(1)</span></a></ul></div> </div> <div class="sidebar"> 友情链接:<a href="http://www.imxmx.com/" title="杰晶网络" target="_blank">杰晶网络</a> <a href="/" title="DDR爱好者之家" target="_blank">DDR爱好者之家</a> <a href="http://www.nqxw.com/" title="南强小屋" target="_blank">南强小屋</a> <a href="http://www.paidiu.com/" title="黑松山资源网" target="_blank">黑松山资源网</a> <a href="http://www.dyhadc.com/" title="白云城资源网" target="_blank">白云城资源网</a> <a href="/sitemap1.xml">站点地图</a> <a href="/sitemap.xml">SiteMap</a> </div> </article> <footer> <p>Design by <a href="http://m.ddrfans.com">DDR爱好者之家</a> <a href="http://m.ddrfans.com">http://m.ddrfans.com</a></p> </footer> <script src="/images3g/nav.js"></script> <script type="text/javascript"> jQuery.noConflict(); jQuery(function() { var elm = jQuery('#left_flow2'); var startPos = jQuery(elm).offset().top; jQuery.event.add(window, "scroll", function() { var p = jQuery(window).scrollTop(); jQuery(elm).css('position', ((p) > startPos) ? 'fixed' : ''); jQuery(elm).css('top', ((p) > startPos) ? '0' : ''); }); }); </script> </body> </html>