ASP开发中有用的函数（function）集合

【文件属性】：

文件名称：ASP开发中有用的函数（function）集合

文件大小：38KB

文件格式：TXT

更新时间：2012-08-19 15:40:22

asp,function

ASP研发中有用的函数（function）集合(1) <% ’************************************* ’防止外部提交 ’************************************* 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 ’************************************* ’IP过滤 ’************************************* function MatchIP(IP) on error resume next