0

我一直在研究 vbs 登录和注册程序 我有一个功能齐全的工作注册程序,但是我无法查看输入框(即密码)是否等于文件中注册时记录的密码

    uname = inputbox("Please type your Username.")
    pword = inputbox("Please ebter your Password.")

    Set objFileToRead = CreateObject("Scripting.FileSystemObject").OpenTextFile(uname + ".txt",1)
    strFileText = objFileToRead.ReadLine()
    objFileToRead.Close
    Set objFileToRead = Nothing
    If strFileToRead = pword Then
        document.write("Welcome!")
              CreateObject("WScript.Shell").Run "forums.htm"
    Else 
    msgbox("Incorrect Username or Password")
    Wscript.Quit
    End If
4

1 回答 1

2

使用“选项显式”。然后像

strFileText = objFileToRead.ReadLine()

对比

If strFileToRead = pword Then

( strFileText <> strFileToRead )

会被抓住。

于 2013-08-31T20:19:27.857 回答