求限制訪問IP的代碼

求限制訪問IP的代碼，要求是在HTML中使用，請各位大蝦不吝指教！

取得客戶端的IP，$_SERVER["REMOTE_ADDR"]
IP不在範圍不給訪問。
2 _, N3 g* q% }& \; w答2：
. E1 E8 ]" P' a4 P' r限制某個頁面,用樓上的方法.
1 ~$ N4 w) a! {  bif(eregi("^192.168.0.",$_SERVER['REMOTE_ADDR'])){
    echo "可以訪問";
% t0 ^9 H9 L; M} else {
0 ^  e+ b- a8 h& J# v　　echo "拒絕訪問";
  g+ e$ k& s1 w7 b$ x# u6 L) p; ^｝
－－－－－－－－－－－－－－－－
; p7 Y$ e9 W# @7 k* R3 s6 ?限制整個網站(apache服務器）在httpd.conf中:
. g9 ^' K; [( o0 L) W9 [deny from all
) X9 X, l, `+ vallow from 192.168.0.x
答3：
if(eregi("^192.168.0.",$_SERVER['REMOTE_ADDR'])){
6 K7 h& B* w+ f8 s6 V===>if(eregi("^192\.168\.0\.",$_SERVER['REMOTE_ADDR'])){
答4：
- j# U6 k7 o5 D9 w: hfunction getip()
6 h0 R$ P/ J! e# x7 X{
7 T" z, S* h/ T7 @   if(getenv('HTTP_CLIENT_IP'))
: s0 R0 P9 Q1 v0 h   {
; L6 O. p4 |' Y/ M) D1 B1 j2 h           $onlineip = getenv('HTTP_CLIENT_IP');
% x8 d5 p5 Y1 v7 U5 B1 d, {+ z  y   }
7 ]0 n# r0 ]0 Q8 V   elseif(getenv('HTTP_X_FORWARDED_FOR'))
; E' q5 R7 r7 }4 p8 B0 Y   {
           $onlineip = getenv('HTTP_X_FORWARDED_FOR');
- z- K" _) N- ~4 R" n   }
: H- ]! o% M! i$ X) I   elseif(getenv('REMOTE_ADDR'))
7 p% q: _% z% o3 [   {
# I* f9 _  l$ q0 h9 z           $onlineip = getenv('REMOTE_ADDR');
   }
% _1 U% C8 G0 c. o) D   else
   {
           $onlineip = $HTTP_SERVER_VARS['REMOTE_ADDR'];
   }
6 X( a6 y+ _) j9 J1 S4 @   return $onlineip;
}


function estop($ips)
{
" A" V2 j  }: ^3 G: O5 t6 @/ d        global $db;
        $ip = explode('.',$ips);
        $sql = "select * from ipestop";
: g: z5 R: m2 P8 _: F' Z. c        $db->query($sql);
$ E" K. ?3 h/ \7 O        while ($banned = $db->records())
. Z  Q  |* ^& T0 X4 I% B5 Q  F  P        {
           $exists = 0;
& G; Z; d: r8 q: D           for($i = 1; $i <= 4; $i++)
# c3 f$ e- l: l, [* s           {
/ G  [, P' S5 j8 _" l! V9 F              if($banned["ip$i"] == -1)
' u4 n/ t0 G$ z0 O              {
                      $exists++;
              }
              elseif($banned["ip$i"] == $ip[$i-1])
              {
                          $exists++;
' J. j7 v* K: P  W3 ?          }
$ {) J2 b6 U4 z' Y          }
          if($exists == 4)
3 k9 b, f) V6 Q1 X, f8 i          {
             die("該IP 已經被禁止訪問！");
         }
" a7 ^! `& u4 n: D% T% L   }
5 T9 X: d* A9 X' `}
* @, _. T* c8 D$ z! B0 u
表結構：
3 @! s: @/ `1 ^5 a8 B2 ACREATE TABLE ipestop(
7 [1 N% ]  q6 o6 i& D' h3 P6 p  id smallint(6) unsigned NOT NULL auto_increment,
( {2 N4 Q: p6 L' Z/ E  ip1 smallint(3) NOT NULL default '0',
" P0 N) \$ p' A: D8 v  ip2 smallint(3) NOT NULL default '0',
  ip3 smallint(3) NOT NULL default '0',
  ip4 smallint(3) NOT NULL default '0',
  PRIMARY KEY  (id),
2 x6 |1 @% z# D2 `  KEY ip1 (ip1),
. X; o6 I: }' Y. b" M5 I  KEY ip2 (ip2),
  KEY ip3 (ip3),
* _+ M, Y( |- S& p' L# w7 J  KEY ip4 (ip1)
) TYPE=MyISAM;