vb.net - 如何在 VB.net 上创建登录。

Question

我的软件需要认真的帮助。我正在为选举建立一个系统。我需要进行登录，从文本文件中读取和识别文本，如果它是文本框中正确的用户名和密码，那么它会打开另一个表单。我必须制作一个允许各种用户登录的文本文件。我目前正在使用 vb 2010。谢谢

Answer 1

你很幸运！我刚刚制作了自己的系统:)

Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click
    If (My.Computer.FileSystem.FileExists("C:\ProgramData\Hax Client\User Data\Temp Users\" + txtUsername.Text + ".txt")) Then
    ElseIf (My.Computer.FileSystem.FileExists("C:\ProgramData\Hax Client\User Data\" + txtUsername.Text + ".txt")) Then
        Using sr As New StreamReader("C:\ProgramData\Hax Client\User Data\" + txtUsername.Text + ".txt")
            While Not sr.EndOfStream
                        Dim unpw() As String = sr.ReadLine.Split("|")
                        'example is username|password
                        'our array is now unpw(0) = username
                        '                 unpw(1) = password
                        If txtUsername.Text = unpw(0) And txtPassword.Text = unpw(1) Then
                            'sucess
                            'Loads new form once correct details have been entered
                            If (unpw(0) = "guest" And unpw(1) = "guest") Then
                                Dim GuestWindow As New GuestWindow
                                GuestWindow.Show()
                                Me.Close()
                            Else
                                Dim MainWindow As New MainWindow
                                MainWindow.Show()
                                Me.Close()
                        End If
                    End If
                End If
            End While
        End Using
    Else
        My.Computer.FileSystem.WriteAllText("C:\ProgramData\Hax Client\User Data\Temp Users\" + txtUsername.Text + ".txt", "Failed Login! Used username: " + txtUsername.Text, False)
    End If
End Sub

现在我的工作方式是在“C:\ProgramData\Hax Client\Users\.txt”

文本文件：

<username>|<password>

为简单起见，只需将文本文件命名为用户名。您可以尝试对它们进行编码吗？但我不确定如何。

无论如何，如果您需要更多帮助，请回复:) 同样在我创建的用户文件夹中 \Temp Users 这是登录失败的地方，然后在登录后被清除。它可以阻止编码崩溃。

Skype：nfell2009