Oliver916 قام بنشر ديسمبر 15, 2009 مشاركة قام بنشر ديسمبر 15, 2009 (معدل) بسم الله الرحمن الرحيم انا لدي قاعدة بيانات فيها نموذج لادخال اسم المستخدم و كلمة المرور قبل الدخول المهم انني عندما ادخل الاسم و كلمة المرور لا يقبلهم الا اذا كانت على الحاسوب الذي قمت بتصميم قاعدة البيانات عليه! مالحل؟ و هذا الكود: 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 رابط هذا التعليق شارك More sharing options...
Oliver916 قام بنشر ديسمبر 16, 2009 الكاتب مشاركة قام بنشر ديسمبر 16, 2009 هل من مجيب؟ رابط هذا التعليق شارك More sharing options...
Bluemind قام بنشر ديسمبر 17, 2009 مشاركة قام بنشر ديسمبر 17, 2009 اخوي هل استخدمت خاصية Users and permissions لانشاء حسابات المستخدمين؟؟ رابط هذا التعليق شارك More sharing options...
Oliver916 قام بنشر ديسمبر 19, 2009 الكاتب مشاركة قام بنشر ديسمبر 19, 2009 هل استخدمت خاصية Users and permissions لانشاء حسابات المستخدمين؟؟ ^^^^^^^^^^^^^^^^^ لا لم استخدم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان