ASP Tutorial - Osnove ASP-a (Deo II)

• 1Ovo se svidja korisniku: mcrule
  
  Registruj se da bi pohvalio/la poruku!

da nastavimo...
u proslom delu smo pricali o uslovima, petljama i promenljivama. sada cemo pricati o funkcijama i procedurama

i stime cemo zavrsiti ovaj deo Osnova ASP-a

Procedure



procedure su blokovi koda koji vas oslobadjaju bespotrebnog pisanja istog dela koda vise puta, a samim tim i

smanjuje velicinu stranice na serveru.
Procedure ne vracaju nikakvu vrednost i izvrsavaju se tako sto se navede ime procedure i eventualno argumente.

jednom napisana procedura moze da se poziva hiljadu puta.


sintaksa procedure:
<% [Public | Private] Sub ime_procedure [(arg1, arg2, arg3... argn)] '// blok koda End Sub %>

sve sto je unutar [ i ] zagrada je opciono...

kada je procedura deklarisana kao Public, to znaci da svi clanovi klase (pa i ovi izvan nje) u kojoj se nalazi

ta procedura imaju pristup njoj (ovo vazi i za funkcije, promenljive, konstante...)

Private znaci da samo clanovi klase mogu da joj pristupaju i zatvorena je za ostale procedure, funkcije izvan

te klase u kojoj je.


primer jedne procedure
<% Public Sub Ispisi () Response.Write("Ja sam tekst koji je izbacila procedura Ispisi :)") End Sub %>


Funkcije (u daljem tekst f-je)


f-je su slicne procedurama stom razlikom sto vracaju vrednost i kao takve pogodne su da se ubacuju u uslove (u

prethodnom casu smo pominjali uslove) jer f-je vrate vrednost i odmah uporede sa uslovom.


sintaksa f-ja
<% [Public | Private] Function ime_funkcije [(arg1, arg2, arg3... argn)] End Function %>

primer jedne f-je
<% Public Function Saberi(a,b) Saberi = a + b End Function %>

kada se izracunavanje u f-ji obavi, obavezno se rezultat mora vratiti imenu f-je Saberi = a + b.
kada smo ovo uradili, mozemo da ubacimo f-ju u uslov


<% If Saberi(2,2) = 4 Then Response.Write("Da, 2 + 2 jeste 4!") End If %>


ono sto ce vam trebati pri registrovanju (upisivanju novih korisnika u bazu) jeste validacija email adrese.
ovo mozete uraditi i bez f-je, ali je na ovaj nacin lakse zato jer ako se na vasem sajtu validacija email

adrese ponavlja vise puta, za svaki put vi biste pisali ponovo. ovako samo pozovete f-je sa drugim

argumentom/argumentima..

evo f-je za validaciju email adrese
<% Dim at, dot Public Function ValidEmail(polje_mail_adrese) If Len(polje_mail_adrese) < 6 Then    Response.Write("Email adresa nije validna!") Else    at = InStr(2, polje_mail_adrese, "@")    If at = 0 Then       ValidEmail = "Email adresa nije validna!"    ElseIf CInt(dot) + 1 > Len(polje_mail_adrese) Then       ValidEmail = "Email adresa nije validna!"    Else       ValidEmail = "Email adresa je validna!" End If    End Function %>

ovaj kod mozete izmeniti i kao umesto vracanja Stringa (Email adresa nije validna!/Email adresa je validna!)

mozete da stavite 0/1 respektivno i ubacite ValidEmail u IF uslov i u zavisnosti od unesene email adrese if

uslov se grana gde treba i prikaze ono sto je potrebno...