Програмний код WEB-сторінок
Index.php (див. рис 1)
lt;? include base.php raquo ;;
$ r=ComandEnc ( reestr , $ _ REQUEST); (isset ($ _ REQUEST [send_mod]))
{$ curid=$ _REQUEST [id]; " lt; HTML gt; lt; HEAD gt;
lt; META HTTP-EQUIV= Refresh CONTENT= 0; URL=invoice.php? Id=$ curid gt;
lt;/HEAD gt; lt;/HTML gt;" ;}? gt;
lt; html gt;
lt; head gt;
lt; meta http-equiv= Content-Type content= text/html; charset=windows - 1251 / gt;
lt; title gt; Операції з номерами lt;/title gt;
lt; link rel= stylesheet type= text/css href= cs.css gt;
lt;/head gt;
lt; body gt;
lt; form action= index.php method= post name= input_num gt;
lt; table gt;
lt; tr gt;
lt; td gt;
lt; table border= 1 cellpadding= 0 cellspacing= 0 gt;
lt; tr gt; lt; td colspan= 2 align= center gt; lt; strong gt; Реєстрація заселення lt;/strong gt;
lt; input type= hidden name= id value= lt ;? echo ($ r [0])? gt; gt;
lt;/td gt; lt;/tr gt;
lt; tr gt; lt; td width= 150 gt; Клієнт: lt;/td gt;
lt; td gt;
lt;? GetPickData ( select * from Klients , , 1, klient , $ r [1]);? gt;
lt; a href= klients.php gt; Новий клієнт lt;/a gt;
lt;/td gt; lt;/tr gt;
lt; tr gt; lt; td width= 150 gt; Номер: lt;/td gt;
lt; td gt; lt ;? GetPickData ( select * from Numbers n where places gt; (select count (numer) from reestr r (r.numer=n.id) and (r.data_ot gt; CURRENT_DATE)); , * from Numbers n where places lt;=(select count (numer) from reestr r (r.numer=n.id) and (r.data_ot gt; CURRENT_DATE)); , 1, numer , $ r [2]); ? gt;
lt; a href= AddNum.php gt; Новий номер lt;/a gt; lt; br gt; lt;/td gt; lt;/tr gt;
lt; tr gt; lt; td width= 150 gt; Дата приїзду: lt;/td gt;
lt; td gt; lt; input type= text name= data_p maxlength= 30 value= lt ;? echo ($ r [3])? gt; gt; lt;/td gt; lt;/tr gt;
lt; tr gt; lt; td width= 150 gt; Дата від'їзду: lt;/td gt;
lt; td gt; lt; input type= text name= data_ot maxlength= 30 value= lt ;? echo ($ r [4])? gt; gt; lt;/td gt;
lt;/tr gt; lt; tr gt;
lt; td colspan= 2 align= center gt; lt; input type= submit name= prev value= lt; lt; lt; / gt;
lt; input type= submit name= next value= gt; gt; gt; / gt; lt; input type= submit name= add value= Додати gt; lt;/td gt;
lt;/tr gt; lt; tr gt; lt; td colspan= 2 align= center gt;
lt; input type= submit name= insert_data value= Зберегти / gt;
lt; input type= submit name= delete_data value= Видалити / gt;
lt; input type= submit name= send_mod value= Рахунок на оплату / gt;
lt;/td gt; lt;/tr gt; lt;/table gt; lt;/td gt; lt; tr gt; lt; td gt; lt; table border=1 gt; lt; tr gt;
lt; td colspan=4 gt; Список проживаючих клієнтів lt;/td gt; lt;/tr gt; lt; tr gt;
lt; td colspan=4 gt; lt; input type= text name= edit_search gt;
lt; input gt;
lt;/td gt; lt;/trgt;lt;trgt;lt;tdgt;Клиентlt;/tdgt;lt;tdgt;Номерlt;/tdgt;lt;tdgt;Дата приїзду lt;/td gt;
lt; td gt; Дата від'їзду lt;/td gt; lt;/tr gt;
lt;? if (isset ($ _ REQUEST [search]))
{$ sql= select k.fio, n.numer, r.data_p, r.data_ot from reestr r left join klients k on k.id=r.klient left join numbers n on n.id=r.numer where (r.data_ot gt; Current_date) and (r.data_p lt;=Current_date) and (k.fio like " $ _ REQUEST [edit_search]% ") raquo ;;
} else
$ sql= select k.fio, n.numer, r.data_p, r.data_ot from reestr r left join klients k on k.id=r.klient left join numbers n on n.id=r.numer where (r.data_ot gt; Current_date) and (r.data_p lt;=Current_date) raquo ;; ($ sql, 0);? gt; lt;/td gt;