求限制訪問IP的代碼

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

取得客戶端的IP，$_SERVER["REMOTE_ADDR"]
IP不在範圍不給訪問。
答2：
限制某個頁面,用樓上的方法.
/ _& L! f8 x# u- w# pif(eregi("^192.168.0.",$_SERVER['REMOTE_ADDR'])){
    echo "可以訪問";
} else {
　　echo "拒絕訪問";
｝
－－－－－－－－－－－－－－－－
4 G) g0 X- J! ]- G3 g限制整個網站(apache服務器）在httpd.conf中:
! d1 o2 p) i+ ~6 s1 Y% }! O, ]deny from all
7 H7 A& w+ B9 f8 q, T$ C5 ~4 j  _allow from 192.168.0.x
答3：
if(eregi("^192.168.0.",$_SERVER['REMOTE_ADDR'])){
===>if(eregi("^192\.168\.0\.",$_SERVER['REMOTE_ADDR'])){
7 F4 A* t: _. ^$ s' g答4：
% D  F) x2 r) U: K6 l* y: o! L9 U$ ~function getip()
' a: d( U9 m: Y+ F8 @7 c{
) c5 c/ }$ N5 e3 ]6 `! {2 ]   if(getenv('HTTP_CLIENT_IP'))
! h- `; b) h; ?- j/ Q# L; V4 C   {
' R7 y4 B* l5 g! e+ X* c           $onlineip = getenv('HTTP_CLIENT_IP');
8 M) @7 _7 j, `; K' e. c   }
   elseif(getenv('HTTP_X_FORWARDED_FOR'))
) w. W& f/ i" k   {
/ @: `/ @2 x& L) k; b$ f! D           $onlineip = getenv('HTTP_X_FORWARDED_FOR');
   }
   elseif(getenv('REMOTE_ADDR'))
" Z" b8 w+ S' V% a% s0 h; Y   {
& w1 X8 q1 W' x6 W( o0 V+ g           $onlineip = getenv('REMOTE_ADDR');
   }
   else
4 ]% E, |1 C5 o! \& R   {
           $onlineip = $HTTP_SERVER_VARS['REMOTE_ADDR'];
   }
4 ?- r; \  o2 T# x+ g   return $onlineip;
( y) F8 c1 j# U- K& d}


function estop($ips)
6 j' `' f  a: Y$ ]; _1 E' s{
# Y( M: n  V# z        global $db;
        $ip = explode('.',$ips);
% O9 V# t$ w: r  U( I- b        $sql = "select * from ipestop";
        $db->query($sql);
# N* H7 X. A+ z5 K        while ($banned = $db->records())
8 P- m# q9 g4 r/ l        {
3 R, k# E1 H. Y3 w+ v           $exists = 0;
* @3 ?- f/ z" U# Z  v           for($i = 1; $i <= 4; $i++)
           {
: [* u/ ^  i/ P. L- w9 V0 Q9 x              if($banned["ip$i"] == -1)
              {
' [  a' `: Z* b                      $exists++;
4 J7 D" l$ S9 g: B* G3 p              }
              elseif($banned["ip$i"] == $ip[$i-1])
$ E0 c2 v8 ~& ^" P6 N/ E/ x              {
                          $exists++;
% Y# u: Z" t" m5 R7 W$ X          }
          }
, o7 a$ V" l7 q* v* O' f# K1 \" o          if($exists == 4)
) d/ W) x+ Y% H- q8 v% P9 T          {
             die("該IP 已經被禁止訪問！");
" \6 Q1 U# d) {$ C         }
6 ?8 M" t6 `) @0 A2 u& t: r   }
9 x- G* \: m$ g$ |2 n}
! F5 V  V6 o, R( [9 A
4 v& R) m$ i+ z6 k) ?  ?表結構：
CREATE TABLE ipestop(
  id smallint(6) unsigned NOT NULL auto_increment,
! p3 ?4 u1 F, m( Y  w( F  ip1 smallint(3) NOT NULL default '0',
  ip2 smallint(3) NOT NULL default '0',
  ip3 smallint(3) NOT NULL default '0',
  ip4 smallint(3) NOT NULL default '0',
  PRIMARY KEY  (id),
  KEY ip1 (ip1),
  KEY ip2 (ip2),
" b) u7 m) D- h) Z  _/ g0 w; o  KEY ip3 (ip3),
  KEY ip4 (ip1)
0 Z6 @3 T1 n( h3 n) TYPE=MyISAM;