vad säkert är password login enligt denna kod
är det mycket lätt att komma förbi??

Private Sub chkRemember_Click()
SaveSetting App.EXEName, "Options", "Rember password", chkRemember.Value
End Sub




Private Sub cmdCancel_Click()
Unload Me
End Sub

Private Sub cmdOK_Click()
If txtUserName.Text = "Hasse" And txtPassword.Text = "Hasse" Then
Unload Me
Form1.Show
Else
MsgBox "Fel försök igen", vbCritical, "Error"
End If
End Sub

Private Sub Form_Load()
Dim Remember As Long

Remember = GetSetting(App.EXEName, "Options", "Remember Password", 0)
If Remember = 0 Then
Me.chkRemember.Value = vbUnchecked
Me.txtPassword.Text = ""
Else
Me.chkRemember.Value = vbChecked
Me.txtPassword.Text = "Hasse"
End If

End Sub

Private Sub txtPassword_Change()
If txtPassword.Text = "Hasse" Then
chkRemember.Visible = True
End If
End Sub

Hasse