[mustafa mohamed]

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

[ahmedabdelaliem]

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

كلام جميل ارفع مثال لعمل هذا ا لاستعلام على ان يكون بالكود بدون استخدام اي اداة ربط

وانتظر الرد ولكن يجب تذكيري على الخاص بالموضوع

بالتوفيق اخي الحبيب

[جاسم عبد]

السلام عليكم 
هذا الكود يعرض لك الرقم والاسم ومن خلاله يمكنك عرض ماشئت من الحقول

كود :

If RS.State = 1 Then RS.Close
RS.Open "select all mytable.no as الرقم,Na as الاسم from mytable"
Set HFG.DataSource = RS

[mustafa mohamed]

  منظومة معلمين.rar (الحجم : 1.23 م ب / التحميلات : 197)
  منظومة معلمين.rar (الحجم : 1.23 م ب / التحميلات : 197) شكرا على الاهتمام باذن الله سوف ارفع المثال والمطلوب ... ليس كود بحث او استعلام داخل جدول معين بل اختيار  حقول من جدول عن طريق المستخدم وليس المبرمج يعني عرض في الفيلكس قريد عن طريق اختيار المستخدم لحقول معينة من اداة مثل اليست بوكس  او غيرها  مثلا... اسم الموظف... تاريخ الميلاد ...الرقم الوطني.. وبعد ذلك يتم عرضها في الفيلكس قريد

[mustafa mohamed]

(15-11-17, 01:58 PM)جاسم عبد كتب : السلام عليكم 
هذا الكود يعرض لك الرقم والاسم ومن خلاله يمكنك عرض ماشئت من الحقول

كود :

If RS.State = 1 Then RS.Close
RS.Open "select all mytable.no as الرقم,Na as الاسم from mytable"
Set HFG.DataSource = RS

---

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

[mustafa mohamed]

(15-11-17, 11:59 AM)ahmedabdelaliem كتب : السلام عليكم ورحمة الله وبركاته

كلام جميل ارفع مثال لعمل هذا ا لاستعلام على ان يكون بالكود بدون استخدام اي اداة ربط

وانتظر الرد ولكن يجب تذكيري على الخاص بالموضوع

بالتوفيق اخي الحبيب

---

اخي تم ارسال المرفق و رسالة عبر البريد هل فهمت المقصود

[mustafa mohamed]

(17-11-17, 05:44 PM)Amir_alzubidy كتب : السلام عليكم 
مثال : 

بارك الله لك في علمك وزاد لك فيه وشكرا على الاهتمام

[ahmedabdelaliem]

للاسف لم يصلني بريد منك ولكن اخي امير يكون مثاله كافي لك ان شاء الله

لو لسه محتاج مساعده لا تتردد
بالتوفيق

سامحني على التقصير

[mustafa mohamed]

(18-11-17, 12:48 AM)Amir_alzubidy كتب : يمكن تطوير الفكرة لحفظ الاستعلامات لاستخدامها فيما بعد .
على الرحب و السعة

---

بارك الله فيك وفعلا الفكرة تحتاج الى تطوير والان انا قمت ببعض التعديل عليها وسوف ارفع التعديل حتى يستفيد الجميع وياريت يكون في طريقة ... حيث عندي الاسم بالانجليزي واريد تغيير الكلام مثلا عندي اسم الحقل .. a1 .. واريد ان يكون في الليست بوكس ... اسم الموظف ... وايضا في الفليكس قريد
وشكرا على الاهتمام

[Ahmed_Mansoor]

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

أهلا بك أخي الكريم , هذا تطوير بسيط على المثال الرائع لأخوي أمير .