GoldenLine
Zaloguj się
Zbigniew Brzeziński

Zbigniew Brzeziński kierownik, Orange
Polska

Temat: zamknięcie formularza logowania

Witam Wszystkich.
Nie potrafię automatycznie zamknąć formularza logowania po zalogowaniu.
Poniższe makra nie są moją własnością.
W zależności od tego kto się loguje otwiera się inny formularz ale formularz logowania po zalogowaniu się nie zamyka ( frmlogin).
Czy ktoś zechciałby pomóc

Private Sub cboEmployee_AfterUpdate()
Me.txtPassword = ""
End Sub

Private Sub cmdLogin_Click()
If cboEmployee.Column(2) = txtPassword Then
If cboEmployee.Column(3) = "Admin" Then
DoCmd.OpenForm ("Rejestracja")

Else
DoCmd.OpenForm ("Dane")
End If
Else
MsgBox ("Bledne haslo")
Me.txtPassword = ""
End If
End Sub
Link do wypowiedziLink
Marzanna Szulta

Marzanna Szulta właściciel, Usługi
Informatyczne
SZULTASET

Temat: zamknięcie formularza logowania

Procedura zamknięcia formularza to docmd.Close czyli w tym przypadku byłoby to:
Private Sub cmdLogin_Click()

If cboEmployee.Column(2) = txtPassword Then

If cboEmployee.Column(3) = "Admin" Then

   DoCmd.Close

   DoCmd.OpenForm ("Rejestracja")

Else

  DoCmd.Close

 DoCmd.OpenForm ("Dane")

End If

Else

MsgBox ("Bledne haslo")

Me.txtPassword = ""

End If

End Sub
Link do wypowiedziLink
Zbigniew Brzeziński

Zbigniew Brzeziński kierownik, Orange
Polska

Temat: zamknięcie formularza logowania

Marzanna - masz u mnie kwiaty ;-))
Nie wiem tylko gdzie wysłać.
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy





Wyślij zaproszenie do
Anuluj