精做高難度防水抓漏/壁癌/油漆等工程
責任施工、合約保固!
裝潢免費提供紙箱及拆裝、24H全省服務
合約保障、提供您平價又專業的搬家服務

首頁  •  j2h 論壇 • 程式設計討論     • 

[教學]合法入口

房東:新手
發表時間: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 人回應

    姓名:
    佈告內容:
    其他選項: