هل يمكن تعبئة نموذج فرعي غير منضم ببيانات من جدول عن طريق ريكورد سيت

[Mohamed Abo Elala]

هل يمكن تعبئة نموذج فرعي غير منضم ببيانات من جدول عن طريق ريكورد سيت

[Foksh]

وما الذي يمنع ؟؟

ما هو مصدر بيانات النموذج الرئيسي ، وارفق ملفك للإطلاع عليه.

تم تعديل مايو 17 بواسطه Foksh

[Mohamed Abo Elala]

السلام عليكم استاذي Foksh شكرا لردك و علي وقتك 

اقوم بتنفيذ فكره للاشعارات في برنامجي 

واريد تعبئة نموذج فرعي ببيانات من جداول مختلفة و هذه هي الغاية 

 

41 دقائق مضت, Foksh said:

ما هو مصدر بيانات النموذج الرئيسي

اما النموذج الرئيسي فهو غير منضم ايضا

و حاولت وبحثت و سألت شات جي بي تي 

و كان الرد الكود التالي 

 

Private Sub Form_Load()
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    
    ' Open the database
    Set db = CurrentDb
    
    ' Open a recordset for the desired table
    Set rs = db.OpenRecordset("YourTableName")
    
    ' Move to the first record
    rs.MoveFirst
    
    ' Loop through each record
    Do Until rs.EOF
        ' Set the field values of the form to the values in the recordset
        Me.FieldName1 = rs("FieldName1")
        Me.FieldName2 = rs("FieldName2")
        ' Add more lines as needed for each field
        
        ' Move to the next record
        rs.MoveNext
    Loop
    
    ' Close the recordset
    rs.Close
    Set rs = Nothing
    Set db = Nothing
End Sub

و لكن عند التنفيذ تتم تعبئة اخر سطر فقط في الجدول 

تم تعديل مايو 17 بواسطه Mohamed Abo Elala

[kkhalifa1960]

تقضل استاذ @Mohamed Abo Elala محاولتي حسب مافهمت .

DDUnPoundForm.rar

[Mohamed Abo Elala]

12 دقائق مضت, kkhalifa1960 said:

تقضل استاذ @Mohamed Abo Elala محاولتي حسب مافهمت .

DDUnPoundForm.rar 70.58 kB · 0 downloads

شكرا استاذي kkhalifa1960 

و لكن تبقي المشكلة قائمة و هي ان النموذج الفرعي لم يظهر بة الا سجل واحد و ليس الثلاث سجلات المرتبطة به 

[Foksh]

وعليكم السلام ورحمة الله وبركاته ..

ارسل مرفقك أخي الكريم ,, لمشاركة الأستاذ @kkhalifa1960 في تقديم الحلول

تم تعديل مايو 17 بواسطه Foksh

[Mohamed Abo Elala]

سجل المحضرين.rar

الملف المرفق بة رسائل عند الدخول من فورم frmLogin كرسائل لاحداث قربت 

اسم المستخدم / محمد ابو العلا

كلمة المرور / 111

المطلوب عمل صفحة بها نموذج فرعي يملئ بالبيانات المستخرجة بالرسائل 

كلمة سر vba 

3032

@Foksh

kkhalifa1960

[Mohamed Abo Elala]

Foksh

[Foksh]

8 دقائق مضت, Mohamed Abo Elala said:

Foksh

أخي الكريم أولا أين النموذج frmNavi ؟؟؟

ثانياً ، هلا حددت لنا اين النموذج الذي يحتوي النموذج الفرعي لتنفيذ طلبك ، ولكن اعذرني لحين الوصول الى المنزل لتكون قد أوضحت لنا النموذج الهدف !!!!

[Foksh]

أخي الكريم @Mohamed Abo Elala ، الى أن استوعبت الأكواد خرجت بهذه النتيجة ، ولا أعلم إن كانت تخدم فكرتك ..

قمت بتعديلات بسيطة على الوظائف التي في المديول الذي يظهر رسائل التنبيه ، واضطررت لإيقافها والإستعاضة عنها بعدد التنبيهات وعرض النتائج في List Box في نموذج الواجهة .

ولك حرية التعديل طبعاً ، تفضل .

 

سجل المحضرين.zip

[kkhalifa1960]

تقضل استاذ @Mohamed Abo Elala محاولتي حسب مافهمت . اليك الشرح والمرفق .

                                                                                                                                             

DDUnPoundForm.accdb

[Mohamed Abo Elala]

في 18‏/5‏/2024 at 21:45, kkhalifa1960 said:

تقضل استاذ @Mohamed Abo Elala محاولتي حسب مافهمت . اليك الشرح والمرفق .

                                                                                                                                             

DDUnPoundForm.accdb 2.7 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 2 downloads

اشكرك استاذي علي المجهود 

و شكرا علي الاستجابة 

و لكن الاستاذ Foksh افاد بالفكرة التي اريدها بالظبط

في 18‏/5‏/2024 at 06:05, Foksh said:

أخي الكريم @Mohamed Abo Elala ، الى أن استوعبت الأكواد خرجت بهذه النتيجة ، ولا أعلم إن كانت تخدم فكرتك ..

قمت بتعديلات بسيطة على الوظائف التي في المديول الذي يظهر رسائل التنبيه ، واضطررت لإيقافها والإستعاضة عنها بعدد التنبيهات وعرض النتائج في List Box في نموذج الواجهة .

ولك حرية التعديل طبعاً ، تفضل .

 

سجل المحضرين.zip 2.07 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 4 downloads

شكرا استاذ Foksh هذا ما كنت افكر فية بالضبط