繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp Http_Referer,Server_Name和Http_Host
- ASP
- BytesToBstr获取的源码转换为中文的代码
- PostHttpPage用asp是实现模拟登录效果的代码
- asp下实现UrlEncoding转换编码的代码
- GetBody asp实现截取字符串的代码
- asp之GetArray提取链接地址，以$Array$分隔的代码
- DefiniteUrl asp将相对地址转换为绝对地址的代码
- ReplaceSaveRemoteFile 替换、保存远程图片 的代码
- ReSaveRemoteFile函数之asp实现查找文件保存替换的代码
- FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码
- ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码
- CheckFile函数之asp实现检查某一文件是否存在的代码
- SaveRemoteFile函数之asp实现保存远程的文件到本地的代码
- FpHtmlEnCode 函数之标题过滤特殊符号的代码
- GetPaing 函数之asp采集函数中用到的获取分页的代码
- ScriptHtml 函数之过滤html标记的asp代码
- asp实现检查目录是否存在与建立目录的函数
- ShowPage 显示“上一页 下一页”等信息的封装代码
- JoinChar 向地址中加入 ? 或 & 用于实现传参
- CreateKeyWord asp实现的由给定的字符串生成关键字的代码
- Server.Execute方法执行指定的ASP程序
ASP 中的 asp Http_Referer,Server_Name和Http_Host
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2010-01-10 浏览: 227 ::
收藏到网摘: n/a
以前感觉Request.ServerVariables里的值很多，现在看看还是那么多，不过今天谈其中的一个值----HTTP_Referer以及Request.ServerVariables里Server_Name与Http_Host之间有什么区别呢？
刚才运行了一段代码，来查看Request.ServerVariables里面有多少值，看了一下，共50个！
代码<%=Request.ServerVariables.count%>
以前感觉Request.ServerVariables里的值很多，现在看看还是那么多，不过今天谈其中的一个值----HTTP_Referer
首先，我们先知道HTTP_Referer最常用的应用就是能够防止外部提交。
下列情况是从浏览器的地址栏正常取得Request.ServerVariables("HTTP_REFERER")：
1) 直接用<a href="">
2) 用Submit或<input type="image">提交的表单(POST或GET)
3) 使用JAvaScript提交的表单(POST或GET)
下面我们再看看Request.ServerVariables("HTTP_REFERER")不能正常取值的情况：
1) 从收藏夹链接
2) 单击主页或自定义的地址
3) 在浏览器中直接输地址
4) 使用JavaScript的Location.href或者是Location.replace()
5) <%Response.Redirect%>
6) <%Response.AddHeader%>或者是<mete http-equiv="refresh">转向
7) 用XML加载地址
显然，Request.ServerVariables("HTTP_REFERER")在多数情况下是不能正常工作的。关于它的具体用法我会在以后的文章中详细的介绍，同时还会介绍Request.ServerVariables("HTTP_HOST")Request.ServerVariables("SERVER_NAME")之间的区别。
敬请关注！
Request.ServerVariables里Server_Name与Http_Host之间有什么区别呢？
如果不仔细看，您应该看不出它们之间的区别。在网上搜了很多，还是也没有看懂，不过最后还是有一句话很是明白：Http_Host可以Request出非80的Server_Port，简单地说就是，Http_Host=Server_Name:Server_Port。
在以前发表过关于Http_Referer作用的文章，现在结合它来写一个ASP防止外部提交的函数
function ChkPost()
dim server_v1,server_v2
chkpost=false
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
If Mid(server_v1,8,Len(server_v2))<>server_v2 then
chkpost=False
else
chkpost=True
end If
end function
Select Case
假如你希望选择多套代码之一来执行，可以使用 SELECT 语句：
select case payment
case "Cash"
msgbox "You are going to pay cash"
case "Visa"
msgbox "You are going to pay with visa"
case "AmEx"
msgbox "You are going to pay with American Express"
case Else
msgbox "Unknown method of payment"
end select
以上代码的工作原理：首先，我们需要一个简单的表达式（常常是一个变量），并且这个表达式会被做一次求值运算。然后，表达式的值会与每个 case 中的值作比较，如果匹配，被匹配的 case 所对应的代码会被执行。
评论 (0) All
