Centar za edukaciju-BiH

iCentar → Racunari i oprema → Programirannje i baze podataka → Vb/Vbnet


Prosiri i skupi Opcije teme
Stranice (1):1
 Prikazi prvu neprocitanu poruku

#1 14.06.2012 10:27
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Vb Skripte
Kako koristiti VbSkrip odnosno ugraditi ga u nash HTML stranicu?
Ukoliko zelimo pisati proceduru Vb jezikom u html stranici onda je osnovno da znamo da prvo moramo napisati sledeci tag:
<script type="text/vbscript">
ili
<SCRIPT LANGUAGE="VBScript">
To znaci da dajemo do znanja da su sledeci redovi koda u VB.
Na kraju kada zavrsimo sa pisanjem naseg koda moramo zatvoriti gore upisani tag:
</script>
Kako to izgleda u praksi:
PreuzmiIzvorni kôd (HTML):
  3. <script type="text/vbscript">
  4. Function mojaprocedura()
  5.   document.write("Ovo je VB Skript!")
  6. end function
  7.  </script>
  8. </HEAD>
  10.  <button onclick="mojaprocedura()">Klikni me</button>
  11.  </body>
  12. </HTML>

U ovom Primjeru je napisana procedura koja se zove mojaprocedura i poziva se na on klik komandnog tastera.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
Ovaj post je ureden 2 puta. Posljednja izmjena 14.06.2012 11:00 od strane zxz. ↑  ↓

#2 14.06.2012 10:38
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Iz gornjeg primjera se vidi da podatke odnosno rezultat procedure izbacujemo na html stranicu pomocu naredbe document.write("Neki podaci"):

Ako bi to htjeli izbaciti kao msgbox onda bi koristili naredub alert.
Primjer:
PreuzmiIzvorni kôd (HTML):
  3. <script type="text/vbscript">
  4. Function mojaprocedura()
  5.   alert("Ovo je VB Skript!")
  6. end function
  7.  </script>
  8. </HEAD>
  10.  <button onclick="mojaprocedura()">Klikni me</button>
  11.  </body>
  12. </HTML>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 14.06.2012 11:14
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Umjesto naredbe alert mozemo koristiti i naredbu MsgBox.
Onio koji su koristili stari Vb vjerovatno ce se lakse snaci.
Primjer:
PreuzmiIzvorni kôd (HTML):
  3. <script type="text/vbscript">
  4. Function mojaprocedura()
  5.  MsgBox("Ovo je VB Skript!")
  6. end function
  7.  </script>
  8. </HEAD>
  10.  <button onclick="mojaprocedura()">Klikni me</button>
  11.  </body>
  12. </HTML>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#4 14.06.2012 11:16
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
E sad ako bi to Htjeli upisati u neki tekst boks onda moramo dodati formu i tekstboks.
Primjer:
PreuzmiIzvorni kôd (HTML):
  1. <SCRIPT LANGUAGE="VBScript">
  2. Function mojaprocedura()
  3. Dim  Forma
  4. set Forma=Document.MojaForma
  5. Forma.tekst1.value="Ovo je VB Skript!"
  6. end function
  7.  </script>
  8. </HEAD>
  10. <FORM NAME="MojaForma">
  11.  <button onclick="mojaprocedura()">Klikni me</button>
  12. <INPUT TYPE="text" SIZE="20" NAME="Tekst1" VALUE="">
  13. </FORM>
  14.  
  15.  </body>
  16. </HTML>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#5 14.06.2012 11:34
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Sada jedino jos sto nam je ostalo a to je kako procitati iz htm nekog tekst boksa vrijednost.
Primjer:
PreuzmiIzvorni kôd (HTML):
  3. <SCRIPT LANGUAGE="VBScript">
  4. Function mojaprocedura()
  5. Dim  Forma
  6. Dim Vrijednost
  7. set Forma=Document.MojaForma
  8. Vrijednost=Forma.tekst1.value
  9. msgbox Vrijednost
  10. end function
  11.  </script>
  12. </HEAD>
  14. <FORM NAME="MojaForma">
  15.  <button onclick="mojaprocedura()">Klikni me</button>
  16. <INPUT TYPE="text" SIZE="20" NAME="Tekst1" VALUE="Ovo je VB Skript!">
  17. </FORM>
  18.  </body>
  19. </HTML>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#6 14.06.2012 20:56
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Evo sada kobinacija ovoga svega.
Izracunavanje hipotenuze pravouglog trougla kada su poznate dvije katete.
Primjer:
PreuzmiIzvorni kôd (HTML):
  3. <SCRIPT LANGUAGE="VBScript">
  4. Function mojaprocedura()
  5. Dim  Forma
  6. Dim Vrijednost1
  7. Dim Vrijednost2
  8. Dim Rezultat
  9.  
  10. set Forma=Document.MojaForma
  11. Vrijednost1=Forma.tekst1.value
  12. Vrijednost2=Forma.tekst2.value
  13. Rezultat=Sqr(Vrijednost1^2 + Vrijednost2^2)
  14. Forma.tekst3.value =Rezultat
  15. end function
  16.  </script>
  17. </HEAD>
  19. <FORM NAME="MojaForma">
  20. Pravougli trougao:
  21. <br>
  22. Stranica a:
  23. <INPUT TYPE="text" SIZE="20" NAME="Tekst1" VALUE="">
  24. <br>
  25. Stranica b:
  26. <INPUT TYPE="text" SIZE="20" NAME="Tekst2" VALUE="">
  27.  <button onclick="mojaprocedura()">Izra
  28. unaj</button>
  29.  <br>
  30.  Rezultat je:
  31.  <INPUT TYPE="text" SIZE="20" NAME="Tekst3" VALUE="">
  32. </FORM>
  33.  </body>
  34. </HTML>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#7 14.06.2012 21:56
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Pozdravna poruka na stranici.
PreuzmiIzvorni kôd (HTML):
  2.  <head>
  3. <script type="text/vbscript">
  4.  Function Pozdrav()
  5.  i=hour(time)
  6.  If i < 10 Then
  7.   Tekst= "Dobro Jutro...!"
  8. ElseIf i >10  AND i < 18 then
  9.  Tekst= "Dobar dan!"
  10. ElseIf i => 18 AND i< 23 then
  11.   Tekst="Dobro ve
  12. e!"
  13. Else
  14.  Tekst= "Ugodna no"
  15. End If
  16. Alert Tekst
  17. End Function
  18. </script>
  19.  </head>
  20.  <body onload="Pozdrav()">
  21.    Vas HTM kod na stranici
  22.  </body>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
Ovaj post je ureden 1 puta. Posljednja izmjena 15.06.2012 08:54 od strane zxz. ↑  ↓

#8 15.06.2012 08:58
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Evo sad cemo malo stati da provjerimo dali ko ovo cita.
Ako imate kakvih pitanja ili nejasnoca onda naprijed.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#9 09.09.2015 11:07
Avko Van mreze
Administrator
Registrovan od:28.05.2014
Postovi:4,813


Predmet:Re: Vb Skripte
zapeo na samom pocetku.
prepostavljam da bi trebalo u prvoj proceduri nakon sto kliknem na >klikni me< trebalo ispisati "Ovo je VB script", no meni iz tko zna kojih razloga to ne radi.

u mome slucaju se klikne na "zaroni"

web stranica : jedno
zivot je moja domovina.
Ovaj post je ureden 2 puta. Posljednja izmjena 09.09.2015 11:08 od strane Avko. ↑  ↓

#10 09.09.2015 13:23
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,644


Predmet:Re: Vb Skripte
Mali problem sa htmlom.
ovo gore sto si prekopirao bi radilo da nisi umetnuo u vec postojecu stranicu jer ovaj kod je napravljen kao stranica sama za sebe.
Znaci ima na pocetku tag html body i head.
html je tag za pocetak stranice i mora biti i na kraju stranice.
Znaci svaki otvoreni tag se mora i zatvoriti.
Trebas malo pogledati u forumu html.
E sad kako vidi sama vb skript procedura treba da se nalazi u zaglavlju html stranice , naci izmedju tagova head na ovoj tvojoj stranici a ovaj dio koda:
<button onclick="mojaprocedura()">Klikni me</button>
mora biti izmedju tagova Body.

U tvom slucaju znaci <button onclick="mojaprocedura()">Klikni me</button> moze ostati gdje i jeste a proceduru prebaci na vrh u tvoje stranice ispod taga <head>
<!DOCTYPE html>
<html>
<head>

netrebas prenositi iz procedure ostale html tagove.

znaci ispod head samo ovaj dio:
<script type="text/vbscript">
Function mojaprocedura()
MsgBox("Ovo je VB Skript!")
end function
</script>

a dole gdje je sad procedura neka ostane samo ovo:
<button onclick="mojaprocedura()">Klikni me</button>
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

Stranice (1):1

Ko je online?

Aktivni clanovi:
nema clanova


Kontakt
Sva vremena su GMT +01:00. Trenutno vrijeme: 6: 30 pm.