Untitled - Vitajte na stránkach www.einsty.hostujem.sk
Untitled - Vitajte na stránkach www.einsty.hostujem.sk
Untitled - Vitajte na stránkach www.einsty.hostujem.sk
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
P R O G R A M U J E M E<br />
<br />
<br />
<br />
K overeniu prihlasovacích parametrov dochádza v podmienke:<br />
...<br />
if (rs_Line.EOF) then<br />
Response.Write "Nez<strong>na</strong>my autor"<br />
else<br />
Response.Write "Vitaj " & rs_Line.fields("meno") &<br />
rs_Line.fields("priezvi<strong>sk</strong>o")&""<br />
%><br />
<br />
...<br />
Ak je rekordset (množi<strong>na</strong> záz<strong>na</strong>mov) vyhovujúci podmienke prázdny, vypíšeme èervenou<br />
farbou oz<strong>na</strong>m Neznámy autor a ïalej nepokraèujeme. V reálnej aplikácii môžeme<br />
vyrieši neautorizované prihlásenie trochu komfortnejšie. Presmerujeme používate¾a <strong>na</strong><br />
stránku nez<strong>na</strong>my.asp príkazom:<br />
...<br />
if (rs_Line.EOF) then Response.redirect("nez<strong>na</strong>my.asp")<br />
Else<br />
...<br />
sSQL = "INSERT INTO Clanky VALUES (id_clanku.nextval, " &<br />
Request.Form("user")<br />
sSQL = sSQL & ", 0, SYSDATE, '" & Request.Form("<strong>na</strong>zov")& "', "<br />
sSQL = sSQL & "'" & Request.Form("uvodnik")& "', "<br />
sSQL = sSQL & "'" & Request.Form("clanok")& "', 'n.jpg',0) "<br />
Response.Write sSQL<br />
db_test.execute sSQL<br />
db_test.execute "commit"<br />
Response.Write "Èlánok bol vložený"<br />
db_test.Close<br />
Set db_test = nothing<br />
%><br />
<br />
Pre zjednodušenie sme v tomto cviènom príklade vynechali zadanie názvu rubriky a<br />
vloženie prípadného názvu súboru s obrázkom. Neprinieslo by to niè nové, len dve editaèné<br />
polia formulára a kód <strong>na</strong> vloženie ich obsahu do SQL príkazu INSERT.<br />
Táto èas seriálu ASP je posledná v tomto roku. Treba sa zamyslie , èo ïalej. Problematiku<br />
ASP a databázy sme úmyselne prebrali podrobnejšie z jednoduchej príèiny,<br />
ktorá však èasto býva hybnou silou pokroku. Táto príèi<strong>na</strong> je obyèajná ¾ud<strong>sk</strong>á lenivos a<br />
Stránka nez<strong>na</strong>my.asp má jednoduchý kód:<br />
<br />
<br />
Nez<strong>na</strong>my autor<br />
Opakovat prihlasenie <br />
<br />
Link Opakovat prihlasenie presmeruje klienta<br />
<strong>na</strong>spä <strong>na</strong> vstupnú stránku redakcia.html a<br />
umožní mu prípadné opakované prihlásenie sa.<br />
Ak sú zadané údaje správne, privítame autora<br />
vypísaním jeho me<strong>na</strong> a priezvi<strong>sk</strong>a a zobrazíme<br />
formulár <strong>na</strong> vkladanie èlánkov. Formulár je realizovaný<br />
formou tabu¾ky <strong>na</strong> stránke HTML. V jednotlivých<br />
políèkach sú príslušné texty a editaèné<br />
polia. Na vytvorenie formulára môžeme použi<br />
¾ubovo¾ný grafický HTML editor, <strong>na</strong>príklad Microsoft<br />
FrontPage 2002, Macromedia Dream-<br />
Obr. 2<br />
weawer a podobne (obr. 3).<br />
Situácia s odovzdávaním parametrov sa opakuje. Po vyplnení formulára a zatlaèení<br />
tlaèidla Vlož èlánok odovzdáme parametre <strong>sk</strong>riptovému kódu <strong>na</strong> stránke zapis.asp.<br />
Okrem názvu èlánku, úvodníka a samotného textu èlánku však stránke zapis.asp odovzdáme<br />
aj identifikátor autora ako <strong>sk</strong>rytý parameter<br />
<br />
Vytvorme si prototyp stránky zapis.asp, kde zatia¾ len vypíšeme odovzdané parametre.<br />
<br />
Ak nám tento prototyp stránky vygeneruje výpis <strong>na</strong>mi zadaných parametrov vrátane<br />
id_autora, môžeme prikroèi k vytvoreniu SQL príkazu INSERT <strong>na</strong> zápis èlánku do databázy.<br />
Jeho prototyp sme si už vy<strong>sk</strong>úšali v predchádzajúcej èasti, takže len struène <strong>na</strong> zopakovanie:<br />
INSERT INTO Clanky<br />
VALUES (id_clanku.nextval, 1,1, SYSDATE, 'Moderné úèesy',<br />
'Najob¾úbenejšie farby tejto sezóny sú..', '...èervená, melírovaná..',<br />
'uces.jpg',0);<br />
Úplný kód zapis.asp potom bude:<br />
Ukladanie clanku<br />
<br />
Vloženie èlánku do databázy<br />