Comment mettre fin à un fichier vbs si l'entrée n'est pas donnée

Question

Comment terminer le fichier vbs si le mot de passe n'est pas entré, il continue si l'on clique sur "OK". Je veux que cela se termine si rien n'est entré. est-ce possible?

If InputBox("Please enter the passcode.", "Restricted access") = "Passcode" Then MsgBox "Correct passcode. You may continue. 

Dim speaks, speech 
    name=inputbox("What's your name?", "WELCOME") 
    speaks=("Welcome ") + name 
    Set speech=CreateObject("sapi.spvoice") 
    speech.Speak speaks 

Answer 1

Voulez-vous dire quelque chose comme ça?

Dim strPassword As String 
    strPassword = InputBox("Please enter the passcode.", "Restricted access") & "" 
If strPassword = "Passcode" then 
    MsgBox "Correct passcode. You may continue." 
    Dim speaks, speech 
    name=inputbox("What's your name?", "WELCOME") 
    speaks=("Welcome ") + name 
    Set speech=CreateObject("sapi.spvoice") 
    speech.Speak speaks 
else 
    WScript.Quit 
endif