VBScript

ASP-koulutus / kurssit v. 2008

Kurssit saatavilla kautta Suomen. Tule, tutustu ja varaa oma koulutustapahtumasi jo tänään. Kurssit järjestää IT-koulutuksen asiantuntijasi, Koulutus- ja konsultointipalvelu KK Mediat

Ohjausrakenteet

Ehtolauseet

Ehtolauseiden avulla voidaan valvoa ja säädellä komentosarjan suoritusta. Pääperiaatteena ehtolauseissa on, että jotain tapahtuu jos lauseen sisältämä ehto on tosi tai epätosi. VBScriptin ehtolauseet noudattavat Visual Basicista tuttua syntaksia ja rakennetta.

If-Then - lauseet

If-Then (Jos-niin) - lause on kaikissa ohjelmointikielissä eräs keskeisimmistä. Syntaksiltaan se on hyvin yksinkertainen:

 If ilmaisu Then suorita koodia

Ilmaisu saa arvokseen joko True (tosi) tai False (epätosi). Jos ilmaisu on tosi, suoritetaan käsky. Muussa tapauksessa lauseen loppuosa jätetään huomioon ottamatta.

Jos halutaan tehdä useita lauseita, jotka ovat riippuvaisia ilmaisun tuloksesta käytetään syntaksia:

 If ilmaisu Then
 suorita koodia
 and suorita koodia 
 and suorita koodia
 ...

If-Then - lauseen kolmas muunnos määrittää mitä komentosarjan tulee tehdä jos ehto on tosi ja mitä jos ehto on epätosi. Syntaksiltaan se on:

 If ilmaisu Then
 suorita koodia
 Else
 suorita koodia
 End if

Pieni esimerkki on vielä paikallaan asian selventämiseksi. Oletetaan että saamme muuttujien enimi ja snimi arvot käyttäjän antamasta syötteestä. Alapuolella oleva koodi huolehtii siitä, että käyttäjä antaa pakolliset tiedot:

 if enimi="" Or snimi="" Then
 alert("Molemmat nimikentät ovat pakollisia")
 Else
 document.write "<p>Kiitos tiedoistasi</p>"
 End if

Select Case - lause

Select Case - lauseen avulla voidaan suorittaa yksi useista keskinäisesti toisensa poissulkevista koodilohkoista. Helpoin käytännön sovellus tällä on pudotusvalikko ja sen perusteella suoritettavan komentosarjan suorittaminen. Syntaksiltaan Select Case -lause on muotoa:

 Select Case ilmaisunarvo
 Case ilmaisunarvo1
 suorita käsky
 Case ilmaisunarvo2
 suorita käsky
 Case ilmaisunarvoX
 Case Else
 suorita käsky
 End Select

Select Case on erittäin hyödyllinen etenkin kun pitää käsitellä dataa, jossa käyttäjällä on monta vaihtoehtoa valittavana. Alla oleva esimerkki reagoi käyttäjän valitsemiin valintoihin kirjoittamalla tekstiä:

 Select Case Document.lomake.sukunimi.Options(SelectedIndex).Text
 Case "ankka","virtanen","wagner"
 Document.Write "Mitäs ankkalinnaan kuuluu?"
 Case "ahtisaari, halonen, koivisto"
 Document.Write "Suomen pressojen sukua?"
 Case Else
 Document.Write "Kukas sää oot?"
 End Select

Toinen erittäin hyödyllinen tapa käyttää Select Case lausetta on hyödyntää sitä dokumentin ominaisuuksien muokkaamiseen. Seuraava pieni proseduuri mahdollistaa taustavärin vaihtamisen käyttäjän toiveiden mukaan:

 Dim vari
 Sub vaihdaVari (vari)
 	vari = lcase (vari)
    	Select Case vari
            Case "punainen"    document.bgColor = "red"
            Case "vihreä"  document.bgColor = "green"
            Case "sininen"   document.bgColor = "blue"
            Case Else     MsgBox "Valitse jokin muu väri"
       End Select
 End Sub

Tutustu artikkelin muihin osiin:
»»» VBScript »»»Päätöksenteko ehtolausekkeiden avulla
»»» VBScript »»»Silmukat
»»» VBScript »»»Silmukoiden hyödyntäminen kokoelmissa

VBScript

Ohjausrakenteet

Ehtolauseet

If-Then - lauseet

Select Case - lause

Tallenna tämä sivu kirjanmerkkeihin!