رشاد احمد قام بنشر مايو 17, 2019 مشاركة قام بنشر مايو 17, 2019 (معدل) الساده الافاضل كل عام وانتم بخير ....... نأمل تصحيح الخطا فى هذا الكود البسيط واشكركم وكل عام وانتم بخير .الصندوق.accdb تم تعديل مايو 17, 2019 بواسطه رشاد احمد فك الضغط رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر مايو 17, 2019 مشاركة قام بنشر مايو 17, 2019 اخ @رشاد احمد لا استطيع فتح ملفات الضغط الجديده اذ ممكن ارفق ملف الاكسس مباشرة لاتمكن من محاولة المساعده تحياتي رابط هذا التعليق شارك More sharing options...
رشاد احمد قام بنشر مايو 17, 2019 الكاتب مشاركة قام بنشر مايو 17, 2019 لك كل الشكر واتقدير اخى وتم ارفاق الملف بجد انا فخور بهذا المنتدى اولا على دماثة وخلق اعضاءه وثانيا فى الرقى بالخدمه المقدمه ربنا يوفقكم جميعا منذ ساعه, رمهان said: اخ @رشاد احمد لا استطيع فتح ملفات الضغط الجديده اذ ممكن ارفق ملف الاكسس مباشرة لاتمكن من محاولة المساعده تحياتي كل الشكر والتقدير لك اخى وتم ارفاق الملف بدون ضغط رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر مايو 17, 2019 مشاركة قام بنشر مايو 17, 2019 منذ ساعه, رشاد احمد said: لك كل الشكر واتقدير اخى وتم ارفاق الملف بجد انا فخور بهذا المنتدى اولا على دماثة وخلق اعضاءه وثانيا فى الرقى بالخدمه المقدمه ربنا يوفقكم جميعا كل الشكر والتقدير لك اخى وتم ارفاق الملف بدون ضغط العفو المشكلة كانت : 1. اسم دالة البحث dlookup كان هناك حرف e زائد 2. اختلاف اسماء العناصر (مربع اسم المستخدم والباسسورد) حيث اسماؤها نص0 و نص2 وهذا الكود Private Sub login_Click() If Me.نص2 = DLookup("[password]", "users", "[username] = '" & Me.نص0 & "'") Then DoCmd.OpenForm "main scr" DoCmd.Close acForm, "login" Else MsgBox "كلمة المرور او اسم المستخدم غير صحيح" End If End Sub بالتوفيق رابط هذا التعليق شارك More sharing options...
رشاد احمد قام بنشر مايو 17, 2019 الكاتب مشاركة قام بنشر مايو 17, 2019 بارك الله فيك اخى رمهان وجزاك الله خيرا تم حل المشكله وبالتوفيق لك ولكل الاعضاء وكل عام وانتم بخير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان