Hoe kan ik meerdere opties toevoegen aan mijn vbs script?
Dit is wat ik nu heb, heb het samengesteld uit voorbeelden van andere vbs scripts:
--------------------------------------------------------------------
Inp01 = Inputbox ("Wat wilt u?",,"Input")
If Inp01 = "Muziek" then
Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.Run ("""C:\Program Files (x86)\Winamp\winamp.exe""")
Else
Msgbox "Verkeerde input"
End if
--------------------------------------------------------------------
Wat ik wil is dus meerdere inputs dus als ik msn invoer start het msn op.
Toegevoegd na 1 uur:
Door Bami bal heb ik nu dit:
--------------------------------------------------------------------
Inp01 = Inputbox ("Wat wilt u?",,"Input")
Select Case Inp01
Case "muziek"
Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.Run ("""C:\Program Files (x86)\Winamp\winamp.exe""")
Case "msn"
Set WshShell = WScript.CreateObject ("WScript.Shell")
WshShell.Run ("""C:\Program Files (x86)\Windows Live\Messenger\msnmsgr.exe""")
Case Else
Msgbox "Verkeerde input"
End Select
--------------------------------------------------------------------
Nu wil ik een loop maken, dat dit doet:
Als ik opgeef muziek krijg ik weer een inputbox met erin Muziek word gestart, Kan ik nog iets anders voor u doen?
En als ik een verkeerde input geef hij prompt met opdracht niet gevonden probeer opnieuw en bij cencel afsluiten