Texnologiyalari

< b > S h a x siy   m a’lu m o tla rin g izn i  k iritin g !< /fb > < b r>
Ism in g iz:< b r>   < input  t y p e = \”te x t\”  n a m e = \”n a m e \”  s i z e = \ ” 2 0 \”  m ax-
 
le n g t h = \” 2 0 \”  v a lu e = \”\ ” X b r >
E m ailin giz:< b r>  
< in p u t  t y p e = \”t e x t \” 
n a m e = \”e m a il\” 
s i z e = \ ” 2 0 \”
 
m a x le n g th = \” 2 0 \”  v a lu e = \”\ ” X b r >
T ilin giz:< b r>
< se le c t  n a m e = \”la n g u a g e\” >
< o p tio n   v a lu e = \”\ ” > T iln i  tanlang:
< o p tio n   v a lu e = \” E n g lish \” > E n glish
 
< o p tio n   v a lu e = \” S p a n ish \”> S p an ish
 
< o p tio n   v a lu e = \”Ita lia n \” > Italian
 
< o p tio n   v a lu e = \” F ren ch \”> F rench
 
< o p tio n   v a lu e = \”J a p a n ese\” >Japanese
 
< o p tio n   v a lu e = \”u zb ek \” > U zb ek
 
< / s e le c t X b r >
K asb in giz:< b r>   < select  n a m e= V ’jo b \” >
< o p tio n   v a lu e = \”\ ”> N im a   ish   qilasiz?:
< o p tio n   v a lu e = \”s tu d en t\” >Talaba
 
C option  v a lu e = \”p ro g ra m m ed \”> D a stu rch i
 
< o p tio n   v a lu e = \”m a n a g er\” >M enejer
 
< o p tio n   v a lu e = \”te a ch er\” > 0 'q itu v c h i  < /se le c t> < b r >
< in p u t  t y p e = \”su b m it\”  v a lu e = \”su b m it!\” >
< /fo r m > ”; / /   form a  avval  toM dirilganm i?
 
i f  (!isset($seen form ))  :  $error_flag  =   “y ”;  endif;_________

---

/ /   elektron  pochta  m anzili  maydoniga  m a’lumot  kiritilganligini  aniqlash
 
if  (Semail  = =   “”)  :
print  “< font  c o lo r = \”red \” >*  em ail  m a n z ilin g iz n i  k iritm a d in g iz  !< /fo n t>
 

”;  $error_flag  =   “ y ”;
else  :  Semail  =   strtolower(trim($email));
/ /   elektron  pochta  m anzilini  sintaksisi  to ‘g'riligini  tekshirish
 
i f   (!@егеё (‘л( [ а - г А - 2 0 - 9 _ ] |\- |\.) + '- ’@’-’([ а -г А - ^ 2 0 - 9 _ ] |\- |\.) + ’.’[а - г А -7 ]
 
{2,4}S\  Semail))  :
print  “C b r X fo n t  c o lo r = \”r ed \” >*  e m a il  m a n z ilin g iz n i  n o to ‘g ‘ri  k iritd in -
 
g iz !< /fo n t>   
”  ;
$ error_flag  =   “ y ”;  endif;  endif;
/*   agar  x ato  bayrog‘i  $error_flag  o ‘rnatilgan  b o ‘lsa,  form an i  qayta  ch iq a -
 
zish   * /
if ($error_flag  = =   “y ”)  :
print  “ $form ”;else  :  / /   foydalanuvchi  m a ’lu m otlarin i  qayta  ish lash
 
print  “  S iz n in g   m a ’lu m o tla rin g iz  kiritild i!”;  endif;  endif;?>
< /b o d y >   < /h tm l> _________________________________________________________
Foydalanuvchi  ism  yoki  elektron  pochta  m anzilida  chiziq>  (|)  belgisini  ishlatm aganligini  tekshirish  fragmentiga  e ’tibor 
qarating.  str_replace()  funksiyasi  bu  belgilarni  o ‘chirib,  ularni  bo'sh 
satrga  almashtiradi.  Agar  bu  ish  bajarilmasa,  foydalanuvchi  belgisi 
(I)  m a ’lumotlar  fayli  strukturasini  buzadi  va  uni  to ‘g‘ri  qayta  ishla- 
nishiga  halaqit  beradi.
Birmuncha  kichik  hajmdagi  m a ’lum otlarni  qayta  ishlash jarayon- 
ida  m atnli  fayllardan  to‘la  foydalanish  m u m k in .  Biroq  ko‘p  sondagi 
foydalanuvchi  m a ’lumotlari  bilan  ishlash  (saqlash  va  qayta  ishlash) 
u ch un  m a ’lumotlar  bazasidan  foydalanilgan  m a ’qul.

---