07.06.2015 Views

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

SHOW MORE
SHOW LESS

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 />

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!