asp限制域名訪問實現(xiàn)代碼
asp 設置只能指定域名可以使用此網(wǎng)站
代碼一 腳本之家原創(chuàng)
<% myIp = ",127.0.0.1,localhost,chabaoo.cn," myurl= request.ServerVariables("SERVER_NAME") Response.write myurl if InStr(myIp,","&myurl&",")>0 then Response.write "域名合法" else Response.write "域名不合法" end if %>
代碼二
myIp = Array("127.0.0.1","jb51") myHou = new Array("",".com") myDirect ="http://chabaoo.cn/" ip= request.ServerVariables("HTTP_HOST") j=0 for i=0 to ubound(myIp) 'Response.Write(i&"--"&myIp(i)&"<br>") if InStr(ip,myIp(i)&myHou(i))>0 then 'Response.Write(myIp(i)&"==") j=j+1 end if next if j<1 then response.Redirect(myDirect) end if
上面的代碼用到了下面的資料
asp獲取當前域名和端口號方法
asp獲取當前域名從來就不是什么有難度的事情,但是在實際項目使用中,大家獲取的具體URL信息可能是不同的,各個方法獲取見下表,而如果要獲取當前域名,可以看下面加粗部分:
Request.ServerVariables("SERVER_NAME")'當前域名
Request.ServerVariables("SERVER_PORT")'當前端口
Request.ServerVariables("SCRIPT_NAME")'當前文件名
Request.ServerVariables("QUERY_STRING")'當前頁面的傳入?yún)?shù)
Request.ServerVariables("HTTP_USER_AGENT")'取得當前瀏覽器信息
Request("remote_addr")'取得IP
Request.ServerVariables("HTTP_REFERER")'上個頁面地址
Request.ServerVariables("HTTP_HOST")'獲取當前域名
當采用SERVER_NAME時返回的是不帶端口號的URL
相關文章
ASP中SELECT下拉菜單同時獲取VALUE和TEXT值的實現(xiàn)代碼
這篇文章主要介紹了ASP中SELECT下拉菜單同時獲取VALUE和TEXT值的實現(xiàn)代碼,需要的朋友可以參考下2020-06-06asp控制xml數(shù)據(jù)庫的經(jīng)典代碼
本文為大家分享了六段經(jīng)典的asp控制xml數(shù)據(jù)庫代碼,感興趣的小伙伴們可以參考一下2015-09-09ASP ACCESS 日期操作語句小結(jié) By Stabx
ASP ACCESS 日期操作語句小結(jié) By Stabx...2006-10-10