ループ内でVBScriptループを作成するには

Question

このコードを実行すると、パスワードが間違っている場合

varCheck=True 
Do While varCheck 
    Pass=InputBox("Enter Password") 
    Do 
     If IsEmpty(pass) Then 
      WScript.quit 
      Exit Do 
     End If 
     If Pass = "123" Then 
      varCheck=False 
      Exit Do 
     Else 
      varCheck=True 
      MsgBox("Wrong Password...Try Again") 
     End If 
    Loop 
Loop 

すると、それは、コードの先頭に再起動しない、それだけで延々と「間違ったパスワード...もう一度試してみてください」というメッセージボックスをループします。パスワードをもう一度聞かせるにはどうすればいいですか？ （p.s.私はコーディングで初心者ですので、ご自身で説明してください。ありがとう！） 警告！私が前に言ったように、あなたがパスワードを間違えた場合、間違ったパスワードメッセージを無限にループします。

Answer 1

あなたが探しているスクリプトは、私はmsgboxを完全に取り除き、InputBoxテキストに追加することをお勧めします。間違ったパスワードが入力された後、あなたの内側のループを壊すのを忘れたようです。だから、最初に戻ることはできませんでした。

varCheck=True 
Dim StarterText: StarterText = "" 
Do While varCheck 
    Pass=InputBox(StarterText & "Enter Password") 
    Do 
     If IsEmpty(pass) Then 
      WScript.quit 
      Exit Do 
     End If 
     If Pass = "123" Then 
      varCheck=False 
      Exit Do 
     Else 
      varCheck=True 
      StarterText = "Sorry, wrong password, try again: " 

      Exit Do '<-----this is what you forgot. 

     End If 
    Loop 
Loop