koao

السلام عليكم ورحمة الله وبركاته أعتذر أني لم أفهم مرادك أختي روان ... فأسال الله أن يرزقك بمن يساعدك

السلام عليكم ورحمة الله وبركاته أخي الكريم جاوبتك في موضوعك السابق ... ولكن على قصد أن يكون الحروف في الحقل بينها مسافات أصلا ... ولكن يبدو على ما ذكرت في موضوعك هنا أن الحروف في الحقل ليس بينها مسافات (مصد) لذا سأجاوبك الآن على هذا الأساس غير سطر الكود التالي…

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

السلام عليكم ورحمة الله وبركاته أخي الكريم إستخدم الكود التالي Me.RecordSource = "Table1" ولن تلاحظ تغير في البيانات بشكل مباشر حتى تستدعي الكود التالي Me.Requery فهو يفرض على النموذج بأن يستدعي البيانات الجديدة من المصدر الجديد وبالتوفيق

السلام عليكم ورحمة الله وبركاته أخي الكريم .. أعجبتني فكرتك في الإستغناء عن الإستعلام في الكود الذي وضعته .. فجزاك الله خيرا ولاحظت أنك إستخدمت الكود التالي If CountNum > 1 Or CountNum = 1 Then والأفضل إستخدام التالي If CountNum >= 1 Then وإستخدمت في الكود Els…

السلام عليكم ورحمة الله وبركاته أخي الكريم لتحصل على ما تريد غير الكود التالي Me.db_cmb.AddItem (fs.GetBaseName(f1.Name)) إلى التالي Me.db_cmb.AddItem (f1.Name) وبالتوفيق

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

السلام عليكم ورحمة الله وبركاته أرجو أن يفيدك المرفق وبالتوفيق koao_ddd.zip

السلام عليكم ورحمة الله وبركاته أخي الكريم أنا شفتك واضع الكود في مشاركتك وتوقعت أنك أهملت بقية الكود بحكم أنها تعريفات أساسية ... فلازم يكون الكود كالتالي Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentData For Each obj In dbs.AllQueries …

السلام عليكم ورحمة الله وبركاته أخي الكريم لإظهار الإستعلامات غير من True إلى False كما في الكود التالي For Each obj In dbs.AllQueries Application.SetHiddenAttribute acQuery, obj.Name, False Next obj وبالتوفيق

السلام عليكم ورحمة الله وبركاته فكرة رائعة أخي الكريم sahob ... وتحليل برمجي منطقي وعملي ... وأسال الله أن يبارك في علمك ويرزقنا وإياك ومن يقرأ الجنه ... و +1 قليلة في حقك

السلام عليكم ورحمة الله وبركاته أخي الكريم mrnooo2000 جهد جبار الله يبارك فيك وبأفكارك المميزة

السلام عليكم ورحمة الله وبركاته أخي الكريم hamidymom ... وأخي الكريم مشارف أحمد الله الذي من علي بما يحوز على رضاه ثم رضاكما

السلام عليكم ورحمة الله وبركاته أخي الكريم shamel الشكر موصول لك أخي لإتاحة الفرصة لي بمساعدتك أخي الكريم مستر عربي .. أتشرف بردك وكلماتك فلك الشكر والإمتنان

السلام عليكم ورحمة الله وبركاته ما شاء الله عليك .. أخي الكريم mrnooo2000 ... دائما متميز ... على عكسي أنا الذي أردت أن أتعب أخي whassan .. قمت أنت بالتسهيل عليه ... بفكرة رائعة ... فلك الشكر والإمتنان

السلام عليكم ورحمة الله وبركاته أشكرك أخي moh samer ali على دماثة خلقك .. وما قدمت أنا إلا جزء بسيط .. من ما قدمته أنت للمنتدى من مواضيع ومشاركات بناءه

السلام عليكم ورحمة الله وبركاته أخي الكريم .. آسف على التأخر في الرد ولسؤالك عن رأيي .. فيجب أن نعرف أنواع البيانات .. لنحدد تعليمة الإستعلام ... فلا أريدك أن تستخدم True لجلب البيانات كلها .. من نوع رقم أو نص .. وهذا ما سبب لك مشكلة عندما إستخدمة هذه الطريقة …

السلام عليكم ورحمة الله وبركاته أخي الكريم هرمان شرف لي تقديم المساعدة .. وأحمد الله أنني وفقت في الحل أخي الكريم ابراهيم نجم أحمد الله الذي من علي بما يحوز على إعجابك وبما فيه فائدة

السلام عليكم ورحمة الله وبركاته وإياك أخي الكريم hamidymom ... وشاكر لك دعمك لي بكلماتك المحفزة

السلام عليكم ورحمة الله وبركاته أخي الكريم hamidymom الله يعطيك العافية ... وإذا سمحت لي أن أقدم مثالي كفكرة أخرى تفضل اخي المثال في المرفق وبالتوفيق koao_gest.zip