putto

If Me.password = DLookup("[password]", "users", " [username]= '" & Me.username & "'") Then MsgBox "loading" DoCmd.OpenForm "census" DoCmd.Close acForm, "login" Else MsgBox "incorrect username and password" End If

السلام عليكم ورحمة الله وبركاته محتاج مساعدة فى أفكار عن عمل برنامج لمتابعة تنفيذ خطة أعمال شكرااااااااااا