Question

我想要一个vbscript，可以在所需的vbscript之前添加，以请求密码来运行所需的vbscript。

例如，用于打开浏览器窗口的脚本就在那里。我想为运行此脚本添加密码保护。在运行整个脚本时，首先应该要求输入密码，然后如果密码正确，则应该打开浏览器窗口。如果密码错误，请询问密码，直到密码正确。

我尝试使用以下脚本运行.bat文件，该文件位于我的电脑中的D:\Technical\jarvis Files\close firefox.bat，但没有成功。

Set objShell = CreateObject("Wscript.Shell")

dim password

password=InputBox("Please Enter Password:","3 - Tries Left")

if password = ("---------YOUR PASSWORD HERE---------") then
    dim correct
    correct =MsgBox("Correct Password!",64,"correct")
    objShell.Run("-------YOUR LINK HERE--------")

Else

dim again

      again =MsgBox("Incorect Password! Do You Want To Try Again?",53,"Incorect Password!")

    If again = 4 Then
    dim password2
    password2=InputBox("Please Enter Password:","2 - Tries Left")
    if password2 = ("---------YOUR PASSWORD HERE---------") then
        dim correct2
        correct2 =MsgBox("Correct Password!",64,"correct")
        objShell.Run("-------YOUR LINK HERE--------")
    Else
        dim again2
        again2 =MsgBox("Incorect Password! Do You Want To Try Again?",53,"Incorect Password!")
        If again2 = 4 Then
        dim password3
        password3=InputBox("Please Enter Password:","1 - Tries Left")
        if password3 = ("---------YOUR PASSWORD HERE---------") then
            dim correct3
            correct3 =MsgBox("Correct Password!",64,"correct")
            objShell.Run("-------YOUR LINK HERE--------")
        Else
            dim again3
            again3 =MsgBox("Incorect Password! Do You Want To Try Again?",53,"Incorect Password!")
            If again3 = 4 Then

                dim incorect
                incorect =MsgBox("To many incorect passwords! Program will now lock!",16,"WARNIG!!")
                objShell.Run("-------YOUR FAIL LINK HERE--------")

                    end if

                end if

            end if

        end if

    end if

end if

这正是我尝试过的，但我想以另一种方式做到这一点。我希望在密码提示脚本之后集成该vbs脚本的代码，而不是运行.vbs或.bat文件，以便在运行程序脚本之前，要求输入密码。

Answer 1

您找到的代码只是使用InputBox()函数来提示用户输入一些文本。在这种情况下，密码。虽然您可以使用InputBox()来实现此目的，但在用户输入时不会对文本进行模糊处理，这意味着任何人都可以看到他们的密码。

顺便说一句，此代码不适用于批处理文件（.BAT）。这是一个VBScript，这意味着你需要给它一个.VBS扩展名。如果你这样做，那么双击它，你就可以看到它正在做什么。

有关提示用户使用VBScript输入密码的两种方法，请参阅this页面。一个是通过命令提示符完成的，另一个是使用Internet Explorer创建登录表单。

祝你好运。

如何编写一个vbscript来请求运行实际脚本的密码....？

1 个答案: