m00j

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

الاخ غزام العقول .. هون عليك :dry: وبودي انك ما تاخذ المسألة بالحساسية هذي .. بخصوص تقييم إجابة المشرفة الفاضلة زهرة فأنا من قيم الإجابة بما أني من طرح السؤال ,, وقد تعودت من خلال طرح الأسئلة في المنتديات الأجنبية أنه وبعد ان تتم الإجابة عليك أن تقيم ,, هل الج…

وأيضا من خلال بحثي وجدت كود ينفذ المطلوب ولكن بعد أن اجابني الاخ ابو يوسف وفقه الله ,, فلا بأس بإرفاقة لتعم الفائدة وهو كالتالي : Dim varItem As Variant Dim strList As String With Me!ListBox1 On Error Resume Next If .MultiSelect = 0 Then Me!txtItemsName = .Val…

مشرفنا العزيز Abo_Yossof بالفعل التعديل الي قلت عنه صحيح مية مية واصبح الكود ينفذ المطلوب منه :clapping: :clapping: :clapping: :ty: مشرفنتا الفاضلة زهرة كل التقدير والاحترام لك على ما تبذلينه . والله يا جماعة اغبطكم على الفهم الي تتمتعون به والقدرة على التعامل…

ابو لميس .. ما انحلت المكشلة :dry: :dry: نفسي افهم وين المشكلة .. من الجد الاكواد احيانا تعقد الواحد :mad:

السلام عليكم المتوقع من الكود ان يرسل نسخة من كل السجلات التي تم اختيارها من القائمة الى مربع نص. وما يحدث معي ان الكود ينقل سجل واحد فقط ولا يعمل الا اذا كانت خاصية متعدد التحديد : بلا وفي حال تعديل الخاصية إلى عادي للسماح باختيار اكثر من سجل يتوقف الكود عن ا…

شكر جزيلا اخت زهرة الحل فعال :)

اخت زهرة شكرا على الرد ولكن هذا لا يفي بالغرض وفقك الله والسبب اني لم اكن واضح بما يكفي :) ,, فانا احتاج ان اضيف السجلات المعروضة في النموذج فقط آآآمل الاطلاع على المرفق وفكرة الحل : اما اضافة المعيار للكود السابق. كشيء من هذا القبيل : set rs1 = db.OpenRecords…

بمثال بسيط لدي حقلين وهما كالتالي: text1 نص1 نص2 نص3 باستخدام مفتاح يتم النقر عليه ومن ثم تنتقل السجلات الثلاثة إلى : text2 نص1 نص2 نص3 في صف واحد

وجدت رابــــــــــــــــــــــــط يتكلم عن نفس الموضوع وحاولت اطبق واعدل الاكواد فيه ولكن لم اوفق لحل :dry: :dry: آمل ممن لديه خبرة المشاركة في الحل وشكرا

السلام عليكم ورحمة الله الإخوة الكرام سؤال هو : هل يمكن عمل الحلقة التكرارية على النموذج بدلا من عملها على الجدول؟ وذلك بهدف ادراج كافة السجلات المعروضة في النموذج إلى مربع النص Dim db As DAO.Database Dim rs As DAO.Recordset Set db = CurrentDb Set rs = db.Open…

اخي الفاضل omr_g .. آمل تجربة المرفق مرة أخرى وذلك بإضافة أكثر سجل ومع كل سجل صورة ,, علما بأنني جربت المرفق على أكثر من جهاز والمشكلة تظهر دائما !!

للرفع يا خبراء اكسس

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

عفوا .. المشرفة الفاضلة زهرة ,, بعد تجربة الكود وتعديل ملاحظاتك اصبح الكود يعمل بشكل ممتاز إلى أن ظهرت لي مشكلة وهي : اني باستخدام حقل من منوع مرفقات وعند وضعة في نموذج فرعي في عنصر تحكم علامة جدولة وعند محاولة ارفاق اي صورة يعلق البرنامج ولا يستجيب أبدا :( أر…

الإخة الكرام شكرا على الاهتمام وقد وجدت الكود وهو كالتالي If KeyCode = 13 Then Forms![f1]![f3].SetFocus End If بحيث f1 النموذج الرئيسي و f3 النموذج الفرعي و الكود في حدث عند مفتاح الأسفل أو ما يسمى KeyDown لآخر حقل في النموذج الفرعي f2

الجدولة تعمل ولكنها في حالة الانتقال من نموذج فرعي1 لنموذج فرعي2 لا تعمل اظن ذلك من تجربة على الاقل فيما اعمله الآن . من بحثي السابق وجدت مشاركة في احد المواقع تتحدث عن نفس المشكلة ولكن لم افهم الحل ولست متاكد أنها تناسب مشكلتي ام لا :) وهي على هذا الرابط http…

بسم الله الرحمن الرحيم السلام عليكم جميعا ولدي كم سؤال :) مشكورين وهي : س1 : ما هو الكود الخاص بنقل المشيرة من حقل في نموذج رئيسي إلى حقل في نموذج فرعي ؟ س2: ما هو الكود الخاص بنقل المشيرة من حقل في نموذج فرعي1 إلى حقل في نموذج فرعي2 ؟ وذلك عند النقر على مفتاح…

سلمك الله وربارك فيك :) .. و كما قال الله تعالى في كتابه العزيز ( هل يستوي الذين يعلمون والذين لا يعلمون ) . زادني الله وأياك وكل مسلم من العلم النافع ونفعنا بما علمنا آمين.

عفوا .. فقد ظهرت مشكلة في الكود :) وهي أنه لا يسمح بعرض التقارير أو أنه يخفيها لا أدري ما>ا يحدثبالضبط !! آمل التعديل من الأخت زهرة لتعم الفائدة للجميع وشكرا .