不論您搜尋任何資訊，都能讓你可以很方便地找資料
精準投放客群，搶業績最給力，速洽諮詢

[教學]合法入口

房東：新手
發表時間：2006-06-29

php版本的

$validserver=""; //這是填寫網域名稱的請用|來分隔
$url="";//寫你要轉的位置

if (($validserver) && (!preg_match("/$validserver/",$HTTP_REFERER))) {
echo "";
exit;
}

perl版本

$validserver=""; //這是填寫網域名稱的請用|來分隔
$url="";//寫你要轉的位置

if (($validserver) && ($ENV{HTTP_REFERER} !~ /$validserver/)) {print "";}

perl版本

$server="www.ciss.idv.tw∥www.123.com∥203.204.111.121"; #自己添加可以通過的網址以∥區隔

sub checkserver
{
@validserver=split(/∥/, $server);
foreach $validserver(@validserver){
return if($ENV{'HTTP_REFERER'} =~ /$validserver/i);
}
&errorinput("程式網址錯誤！請勿在非正確的網址執行此程式");
}

php

if(!ereg(getenv('SERVER_NAME'),getenv('HTTP_REFERER'))){$chkserver1=1;}
if(!ereg(getenv('SERVER_ADDR'),getenv('HTTP_REFERER'))){$chkserver2=1;}
if(($chkserver1)&&($chkserver2)){echo "請從入口進入";exit;}

js的寫法!感謝羽喬提供資料
轉貼於http://tacocity.com.tw/java/js/j/08.htm

asp版的
Validserver="" //這是填寫網域名稱的
URL=""//填寫首頁

<%
Tohttp=Request.ServerVariables("HTTP_REFERER")
if InStr(Tohttp,Validserver)=0 then
Response.write("")
Response.end
end if
%>

/*
修正一下,否則在IIS上會不太正常
*/

if(!ereg(getenv('SERVER_NAME'),getenv('HTTP_REFERER'))){$chkserver1=1;}
if(!ereg(getenv('LOCAL_ADDR'),getenv('HTTP_REFERER'))){$chkserver2=1;}
if(($chkserver1)&&($chkserver2)){echo "請從入口進入";exit;}

php4的檢查

$chkserverip=(getenv('LOCAL_ADDR'))?getenv('LOCAL_ADDR'):getenv('SERVER_ADDR');
if(!ereg(getenv('SERVER_NAME'),getenv('HTTP_REFERER'))){$chkserver1=1;}
if(!ereg($chkserverip,getenv('HTTP_REFERER'))){$chkserver2=1;}

贊助網站

廣利不動產-板橋在地生根最實在--新板特區指名度最高、值得您信賴的好房仲
完整房訊，房屋、店面熱門精選物件，廣利不動產優質仲介，房屋租賃、買賣資訊透明，交易真安心！
廣利不動產-新板特區指名度最高、值得您信賴的好房仲
您的托付,廣利用心為您服務

　共 0 人回應

姓名：

佈告內容：

其他選項: