diff --git a/EO-Flashcards/EO-Flashcards/Form1.vb b/EO-Flashcards/EO-Flashcards/Form1.vb index 562de52..20fcaa8 100644 --- a/EO-Flashcards/EO-Flashcards/Form1.vb +++ b/EO-Flashcards/EO-Flashcards/Form1.vb @@ -1,6 +1,7 @@ ' Esperanto Flash Cards ' Author - AConsolePeasant ' Last modified - Check on the git page, I shouldn't have to update this for you. +' https://github.com/AConsolePeasant/EO-Flashcards Public Class frmMain Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click diff --git a/EO-Flashcards/EO-Flashcards/frmAdmin.vb b/EO-Flashcards/EO-Flashcards/frmAdmin.vb index 46e45c8..9193def 100644 --- a/EO-Flashcards/EO-Flashcards/frmAdmin.vb +++ b/EO-Flashcards/EO-Flashcards/frmAdmin.vb @@ -1,4 +1,9 @@ -Public Class frmAdmin +' Esperanto Flash Cards +' Author - AConsolePeasant +' Last modified - Check on the git page, I shouldn't have to update this for you. +' https://github.com/AConsolePeasant/EO-Flashcards + +Public Class frmAdmin Private Sub btnAdminPassword_Click(sender As Object, e As EventArgs) Handles btnAdminPassword.Click My.Settings.AdminPassword = InputBox("Enter New Password WARNING, this will change with no confirmation, and if spelt wrong, will set that.") 'This instantly changes the admin password. diff --git a/EO-Flashcards/EO-Flashcards/frmAdminLogin.vb b/EO-Flashcards/EO-Flashcards/frmAdminLogin.vb index 8289909..e79a74e 100644 --- a/EO-Flashcards/EO-Flashcards/frmAdminLogin.vb +++ b/EO-Flashcards/EO-Flashcards/frmAdminLogin.vb @@ -1,4 +1,9 @@ -Public Class frmAdminLogin +' Esperanto Flash Cards +' Author - AConsolePeasant +' Last modified - Check on the git page, I shouldn't have to update this for you. +' https://github.com/AConsolePeasant/EO-Flashcards + +Public Class frmAdminLogin Private Sub btnLogin_Click(sender As Object, e As EventArgs) Handles btnLogin.Click If txtPassword.Text = My.Settings.AdminPassword Then frmAdmin.Show()