مشكلة في تسجيل الدخول

[Oliver916]

بسم الله الرحمن الرحيم

انا لدي قاعدة بيانات فيها نموذج لادخال اسم المستخدم و كلمة المرور قبل الدخول

المهم

انني عندما ادخل الاسم و كلمة المرور لا يقبلهم

الا اذا كانت على الحاسوب الذي قمت بتصميم قاعدة البيانات عليه!

مالحل؟

و هذا الكود:

Option Compare Database

Public LngInterval As Long

Private Sub CmdClose_Click()

    DoCmd.Quit

End Sub


Private Sub Form_Current()

Me.Ad = Date

Me.Refresh

End Sub

Private Sub CmdLogin_Click()

On Error Resume Next

If Me.Bd > Me.Ad And Me.TxtUser = "AA" And Me.TxtPWD = "bb" Then

DoCmd.Close

DoCmd.OpenForm "frm Main"

ElseIf Me.Bd < Me.Ad And Me.TxtUser = "AA" And Me.TxtPWD = "BBCC" Then

MsgBox "Login Successed", vbInformation + vbInformation, "Login"

DoCmd.Close

DoCmd.OpenForm "frm Main"

Else

 MsgBox "Incorrect user name or password", vbExclamation + vbOKOnly, "Login Failed"

End If

End Sub


Private Sub Form_Load()

    'disables the timer control

    LngInterval = 0

End Sub



Private Sub Form_Timer()

    'Unlock controls and make available for input and turn off the hourglass

    Me.TxtUser.Locked = False

    Me.TxtPWD.Locked = False

    Me.CmdLogin.Enabled = True

    DoCmd.Hourglass False

End Sub

تم تعديل ديسمبر 15, 2009 بواسطه Oliver916

[Oliver916]

هل من مجيب؟

[Bluemind]

اخوي

هل استخدمت خاصية Users and permissions لانشاء حسابات المستخدمين؟؟

[Oliver916]

هل استخدمت خاصية Users and permissions لانشاء حسابات المستخدمين؟؟

^^^^^^^^^^^^^^^^^

لا

لم استخدم