Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Complete Boredum Security idea*tested on MS4*
#1
This is great if you want to have a GM Client and a Public client
So even if someone got ahold of a GM account user/pass they would still need a client without this code to login =P
Very easy to install

Open frmLogin
Double click Connect label
change it to look like this
Code:
Private Sub lblConnect_Click()
'makes it so no one using the client can login with this username
If txtName.Text = "Username Here" Then
frmWarn.Visible = True
Else
    
    If LenB(Trim$(txtName.Text)) > 0 Then
        If LenB(Trim$(txtPassword.Text)) > 0 Then
            Call MenuState(MENU_STATE_LOGIN)
        End If
    End If
    End If
End Sub

Code for frmWarn
Make a Form add label or w/e for the text you want the warning to say size it and do w/e
make a Command Button and name it ok
copy/paste and ur done
Code:
Private Sub ok_Click()
Unload Me
End Sub
Reply


Messages In This Thread

Forum Jump:


Users browsing this thread: 1 Guest(s)