[[oktatas:operációs_rendszerek:windows|< Windows]]
====== VBScript ======

  * **Szerző:** Sallai András
  * Copyright (c) Sallai András, 2021
  * Licenc: [[https://creativecommons.org/licenses/by-sa/4.0/|CC Attribution-Share Alike 4.0 International]]
  * Web: https://szit.hu
===== Bevezetés =====

A VBScript egy Visual BASIC alapú scriptnyelv. 

A VBScripteket egy szimpla szövegszerkesztővel is elkészíthetjük, amelyet
a .vbs kiterjesztéssel kell elmentenünk. 


===== Helló Világ =====


<code basic program01.vbs>
MsgBox "Üzenet", 64, "Üzenetablak"
</code>

^  Gombkódok 0..5  ^^
| 0 | Ok |
| 1 | Ok, Mégse |
| 2 | Kilépés, Ismét, Tovább |
| 3 | Igen, Nem, Mégse |
| 4 | Igen, Nem |
| 5 | Ismét, Mégse |


===== Változóhasználat =====

<code vbs>
Uzenet = "Leállhatunk?"
Fejlec = "Üzenetablak"
KerdesIkon = 32
IgenNem = 4
IkonKod = KerdesIkon + IgenNem

MsgBox Uzenet, IkonKod, Fejlec
</code>


===== Matematikai függvények =====


| Abs()  | Abszolút érték |
| Cos()  | Koszinusz |
| Round()  | Kerekítés |
| Sin()  | Szinusz  |
| Sqr()  | Gyök |




===== Adatbevitel =====


<code vbs program03.vbs>
Uzenet = "Akkor leállhatunk"
Valasz = InputBox(Uzenet)
</code>


Esetleg:
<code vbs program04.vbs>
Uzenet = "Akkor leállhatunk"
Fejlec = "Kérdésablak"
AlapValasz = "Igen"
Valasz = InputBox(Uzenet, Fejlec, AlapValasz)
</code>


===== Számítások =====

Operátorok: 
  * +
  * *
  * /
  * Mod
  * -



<code vbs program05.vbs>
MsgBox 2^8, 9 Mod 3, 4+5
</code>


Egészrész:
<code>
a = 3.58
b = Int(a)
</code>


===== Szelekció =====

<code vbs program06.vbs>
If a<5 Then
   Uzenet = "Kisebb"
End If
</code>

===== Iteráció =====

<code vbs program06.vbs>
do
    Uzenet = a
Loop While a < 10
</code>



<code vbs program06.vbs>
For i=1 To 5
    str = str + "o" + vbCrLf
Next
MsgBox str
</code>

A vbCrLf a sortörés konstansa.


===== Függvények és eljárások =====

<code>

c = Osszead(5,8)


Function Osszead(a, b)
  Osszeg = a + b
  Osszead = Osszeg
End Function
</code>



<code>

Uzen()

Sub Uzen
    Uzenet = "Ez az"
End Sub
</code>


===== Linkek =====

  * http://msdn.microsoft.com/en-us/library/d1wf56tt(v=vs.84).aspx (VBS referencia)
  * http://en.wikipedia.org/wiki/VBScript
  * http://serverfault.com/questions/71220/connect-certain-file-to-automatically-launch-through-a-vbs-wscript
  * http://technet.microsoft.com/en-us/library/ee176974.aspx