jjafferr

وعليكم السلام لم يكن ممكنا ان نحل الموضوع بدون المرفق ، والمرفق لم يكن موجودا ، واذا به موجود جعفر تفضلي هذا التغيير في كود زر البحث: Private Sub amr4_Click() انت هنا تطلبين طلب البيانات الجديدة للنموذج الرئيسي ، وهذا ليس المطلوب 'DoCmd.Requery الحقل Research_ID هو حقل تسمية label فالمعادلة ليس لها معنى 'If [Research_ID] = [A] Then يجب ان نتحقق من وجود كلمة في الحقل A If Len(Me.A & "") <> 0 Then Q2.Visible = True وهنا نطلب بيانات جديدة للنموذج الفرعي Me.Q2.Requery Else Q2.Visible = False MsgBox "please note that you should follow up with finaicial affairs(Mr.Mohammed siamek) to fill tou start using the system!! " End If End Sub جعفر

تم فصل موضوع الاخ @حمادة عثمان الى موضوع مستقل: جعفر

السلام عليكم أخي حمادة تم فصل طلبك من الرابط الى موضوع جديد ، لإعطاء الموضوع حقه ، ولعدم تشابك المواضيع في بعض نأتي الى مشكلتك: بيانات الجدول تقول ان حقل faculty هو حقل نص وفيه هذه البيانات . الاستعلام يأخذ معاييره من (الحقل 1 والنموذج fa) . بينما النموذج الوحيد الموجود في البرنامج هو re وليس fa كما اشرت اليه انت في معيار الاستعلام ، وكذلك الحقل الذي اشرت اليه في الاستعلام هو الحقل 1 ، والذي في النموذج هو حقل تاريخ ، فكان الواجب عليك ان تختار الحقل 3: . ونأتي الى زر فتح التقرير في النموذج ، والحدث يشير الى ماكرو ضمني . وعند فتح الماكرو الضمني ، نجد انه يشير الى فتح تقرير بإسم Student . ولكن هذا التقرير لا يوجد في برنامجك!! . اصلح هذه الملاحظات ، وان شاء الله يشتغل تقريرك وبدون مشاكل جعفر

السلام عليكم أخي @حمادة عثمان مشاركتك لا علاقة لها بالموضوع ، لذا رجاء عمل موضوع مستقل له ، شكرا جعفر

ارفق لك طريقتين: DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Query Name", "D:\myFile.xls", True او DoCmd.OutputTo acOutputQuery, "Query Name", acFormatXLS, "D:\myFile.xls", False جعفر

أخي طارق بعد 10 مشاركات منك ، و 8 مشاركات مني ، ولم تستطع ان تشرح لي المطلوب ، وبعدة محاولات مني لفهم طلبك ، انا استسلم سأغلق هذا الموضوع ، لأنه لا فائدة منه. فالرجاء منك فتح موضوع آخر وبه طلب واضح بأسماء الحقول والجداول ، ومثال عن كيف تريد ان يكون الجواب ، تعمله على اكسل او صورة او وورد ، وهذا المثال يجب ان يكون من بيانات مرفقك ، وان شاء الله تجد المساعدة. جعفر المستسلم

وعليكم السلام الافضل ان ترفق برنامجك ونساعدك في تطبيق الكود عليه ، لأنه حتى وإن رفعت مثالي ، فتجربتي تقول بأن صاحب الموضوع سيصر على استعمال مثاله شكرا اخي على كلماتك الجميلة 1. انا لا املك مثال ، وسأضطر الى عمل مثال ، ولكن الافضل ارفاق برنامجك للتعديل عليه فهذه الجزئية اخذتها من احد برامجي لأحد الزبائن 2. هل يمكن عمل هذا ، الجواب نعم ، ولكن كيف؟ أ- كلمة البحث يجب ان ننظفها من جميع التشكيلات ، اي ندخلها في الوحدة النمطية اعلاه مرة واحدة ، ب- كل حقل موجود في سجل يجب ان ننظفه من جميع التشكيلات ، اي ندخله في الوحدة النمطية اعلاه مرة واحدة ، ويعتمد هذا على عدد السجلات المطلوب البحث فيها ، في البرمجه عندك الاختيار بين سرعة البرنامج ، او التفنن في عمل وشكل البرنامج ، في البداية سيطلب الزبون ويطلب ، وانت ستعطي وستغير ، والفائز في النهاية سرعة البرامج ، لذلك الجواب على سؤالك هو: أ- كل حقل في الجدول يحتوي على كلمات فيها تشكيله وتريد البحث فيه ، اعمل حقل جديد في الجدول لها الحقل ، وضع فيها جميع الكلمات بدون تشكيلة ، بإستخدام الوحدة النمطية اعلاه ، او ب- اذا عندك اكثر من حقل في الجدول يحتون على كلمات فيها تشكيله وتريد البحث في جميع هذه الحقول (ليس شرطا ان تبحث في نفس النموذج في جميع هذه الحقول ، فقد يكون عندك نماذج مختلفة للبحث في حقل/حقول معينة) ، اعمل حقل جديد واحد في الجدول ، وضع فيه كلمات الحقول جميعا وبدون تشكيلة ، بإستخدام الوحدة النمطية اعلاه وسواء استخدمت أ او ب ، فطريقة البحث سيان بتقول لي كيف ، وبقول لك ارفق برنامجك جعفر

شكرا جزيلا أخي محمد

انا حاولت ولم اتوصل الى حل ، وبحثت ، ولكن كذلك بدون فائدة جعفر

وعليكم السلام اخي العزيز ، المنتدى مليء بمثل هذا الموضوع ، اعمل بحث ويتلقى الكثير يُغلق الموضوع. جعفر

أخي أحمد تأكد ان ارتفاع قسم Detail هو نفس ارتفاع الحقول ، ثم 1. اختار جميع الحقول ، 2. ستلاحظ المربع 2، 3. اذهب الى 3 ، 4. واضغط على 4 ، لحذف هذه الطريقة . احفظ الملف ، ونتيجة طباعتة التقرير على pdf ، وتكبيره 400% ، يدل على عدم وجود مسافات . اما للتخلص من المسافة تحت المربعات الرمادية ، فاعمل نفس الطريقة لها جعفر 641.New Microsoft Access Database.accdb.zip

1. العمل لازم يكون بالتسلسل اعلاه ، 2. هل جربت المرفق؟

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

وعليكم السلام أخي حمدي البرنامج في المرفق يعطيك المطلوب وبحيث تستخدم مصدر النموذج ، والذي يجب ان يكون استعلام جعفر

وعليكم السلام المثال السابق يُظهر لك السجلات 2 و 4 وهو السجل الذي filter عليه علامة صح ، اما اذا اردت العكس ، وهو ان يظهر لك السجلات 1 و 3 وهو السجل الذي filter ليس عليه علامة صح ، فالكود: Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) If Nz(Me.filter1, 0) <> -1 Then Me.Section(acDetail).Visible = True Else Me.Section(acDetail).Visible = False End If End Sub جعفر

وعليكم السلام ارتفاع القسم يجب ان يكون نفس ارتفاع الحقول ، انظر رقم (1) في الصور . ارتفاع الحقول مساوي لإرتفاع القسم (1) ، ولكن توجد مسافه فارغة اعلى الحقول (2) ، وهي سبب المشكلة ، . جعلنا المسافة اعلى الحقول (2) تساوي صفر ، فارتفعت الحقول الى اعلى ، واصبح لدينا مسافة اسفلها ، والان يجب ان نضيق هذه المسافة ، فنسحب القسم من (3) . الآن ارتفاع القسم اصبح يساوي ارتفاع الحقول ، وهو المطلوب . جعفر 641.New Microsoft Access Database.accdb.zip

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

وعليكم السلام البرنامج بسيط وجميل وخارج عن المألوف ، تسلم ايدك ومتكامل جعفر

ياريت تخبرنا اذا اشتغل عندك البرنامج جعفر

لقد صادفت هذه المشكلة في الكيبل الطويل ، هذا يعني ان الهاتف يحتاج وقت اطول للقيام بالامر السابق ، خلينا ننتقل للنوع الآخر من الكود ، الابطء ونجرب: في الكود (لاحظ الصورة ادناه) ، اكتب الكلمة الحمراء في الكود عندك . ثم جرب تصور مرة ثانية وسأقوم بتغيير الكود لاحقا ليتم فحص كل خطوة سابقة (في الكمبيوتر وليس في الهاتف ، فالمشكلة في الكمبيوتر هنا) جعفر

شكرا جزيلا على التأكيد

بالنسبة الى تعريف الدرايف ، هذا معناه انك لم توصل الهاتف بالكمبيوتر سابقا ، وإلا فخطوة الدرايف المفروض ان نكون منتهين منها من اول مرة توصل التلفون بالكمبيوتر ، ونعم مثل ما قلت "اعتقد كل اصدار من الهواتف وله تعريف خاص به" ، لهذا السبب اشرت انا لهذه النقطة: 1 - 6 الحمدلله ، يعني خطوات سهله 7- نعم هذا صحيح ، ولكن ماذا حصل لصورك القديمة في الهاتف ، هل لاتزال موجودة بعد ان اخذت الصورة الثانية والثالثة ، وهل الصور الجديدة تأتيك للنموذج؟ شكرا جزيلا اخوي ابوخليل على الردود ، لأني للحظة اعتقدت ان الخطوات صعبه وانا فاكر انها سهلة جعفر

وعليكم السلام تفضل امثله جاهزة: http://www.lebans.com/fontcolordialog.htm https://www.microsoftaccessexpert.com/Microsoft-Access-Color-Picker.aspx http://access.mvps.org/access/api/api0060.htm جعفر

الله الله الله ، والله لو تعرف شقدر اثلجت صدري ، اثلج الله صدرك بالايمان ان شاء الله عندي لك كم سؤال لوسمحت: أ. ما مدى صعوبة توصيل الهاتف بالكمبيوتر وجعلهم يتعرفوا على بعض ، ب. ما مدى صعوبة تجهيز مجلدات البرنامج ، وتشغيل البرنامج ، ج. هل صادفتك اي مشكلة في رقم 1 و 2 ، وهل هناك شيء يجب ان اذكره في الشرح ليسهل الموضوع ، د. هل اخذت اكثر من صورة للموظف الواحد؟ 2. رجاء لا تعتمد على عدم الغاء الصور القديمة ، لأن برنامجي يطلب منه الغاء جميع صور مجلد الكاميرا /sdcard/DCIM/Camera/ جعفر

شكرا أخي شفان وبدلا عن هاتف خاص لهذا الموضوع ، تستطيع ان تنقل صورك من مجلد الكاميرا الذي ذكرته سابقا ، بحيث يصبح المجلد بدون صور ، وتستطيع تجربة البرنامج جعفر