ASP检测外部提交函数

2013-12-11消息称，诺基亚Normandy和Asha一样，主打低端市场，将...
2013-12-10雷军微博披露小米“魔方”项目
2013-12-1012306购票首度接入支付宝支付时间可以快至5秒
2013-12-10中国移动官网显示周四接受iPhone 5s预订
2013-12-0912306 App研发故事：变成开放系统社会人员助力
2013-10-15天猫“双十一”今年打通线上线下：实体店参与。
2013-10-15根据专利显示iPhone将有防摔功能。
2013-10-12百度或可全面收购人人网，传闻四起！
2013-10-07生物密码时代何时到来？尚存隐私泄露隐忧
2013-09-29国务院近日印发了上海自由贸易试验区总体方案，自贸区...

加关注：新浪微博腾讯微博

当前位置：首页 > 知道中心 > ASP > 文章

发表于：2013-09-09| 次阅读| 作者：藕码网

TAG： asp 函数

摘要：本文例举了ASP的两个简单的检测外部提交函数的例子，第一个函数是ChkPost()，它可以检测用户当前所在服务器名是否存在于来源页面，第二个函数是PostCheck()，它可以通过很简单的检测，看看提交是否为POST方式。

　　本文例举了ASP的两个简单的检测外部提交函数的例子，第一个函数是ChkPost()，它可以检测用户当前所在服务器名是否存在于来源页面，第二个函数是PostCheck()，它可以通过很简单的检测，看看提交是否为POST方式。

　　　　函数ChkPost()
　　检测用户当前所在服务器名是否存在于来源页面

　　代码如下： 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

　　函数PostCheck()
　　很简单的检测，就是检测提交是否为POST方式

　　代码如下： Function PostCheck()

　　PostCheck=False
　　If Lcase(Request.ServerVariables("Request_Method"))="post" Then PostCheck=True
　　End Function

注：本站部分信息可能源于互联网分享，如有侵权，请告知，我们将及时删除！

上一篇：ASP中ServerVariables集合详细参数说明下一篇：ASP开发技巧集锦（一）