الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مساعدة عاجلة

مغلق
بدأه المهنا في 8 فبراير 2005 · 5 رد · 668 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

هل من الممكن المساعدة في إظهار النتائج في

الجدول الداتا قريد نتائج البحث عند اجراء البحث

وجميع البيانات عند عدم اجراء البحث بشرط مهم جدا

وهو عدم تغيير الرابط بنفس الرابط الموجودحتى

اتمكن من إظهار نتائج البحث وعند الضغط على

الحقل في الجدول تظهر البيانات الخاصة بالحقل في

التكستات بوكس

maktaba.rar

#3

ارغب في اظهار نتائج البحث في الداتا قريد مع طباعتها مع امكانية عرض اسم الحقل باسم مختلف عن الاسم في قاعدة البيانات

بشرط مهم جدا

وهو عدم تغيير الرابط بنفس الرابط الموجودحتى

اتمكن من إظهار نتائج البحث وعند الضغط على

الحقل في الجدول

#5

السلام عليكم

هذا الكود للداتا جرد :

  Dim db As Connection
  Set db = New Connection
  db.CursorLocation = adUseClient
  db.Open "PROVIDER=Microsoft.JET.OLEDB.4.0;Data Source=" & App.Path & "\maktaba.mdb;"

  Dim Rec As Recordset
  
  Set Rec = New Recordset
  Rec.Open "SELECT DATA.*, DATA.tarek From Data WHERE (((DATA.tarek)>#" & Text10.Text & _
         "# And (DATA.tarek)<#" & Text11.Text & "#));", db, adOpenStatic, adLockOptimistic

  Set DataGrid1.DataSource = Rec

مع ملاحظة :

أن Text10.Text يحمل قيمة تاريخ البداية

و Text11.Text يحمل قيمة تاريخ النهاية

ويجب أن تلغي مرجع DAO

والله أعلم .

تم تعديل هذه المشاركة بواسطة MSVS في 13 فبراير 2005 في 12:31

أخي سوف تبكي عليك العيون * * * وتـسـأل عـنك دمـوع المـئـين

فإن جف دمعي سيبكي الغمام * * * يـرصـع قـبرك بــالـياسـمـيـن

أخـي مـا يـأسـنـا ولـن نيـأسـا * * * وما طال في القلب لبث الأسى

ومـا حـل أفــئــدة الــمــــؤمـن * * * سـوى أمـل في الـجنـان رسـى

أخي فانتظر ولتعش في غـد * * * سـيـنـبـثـق الأمـل الـسـرمـد

فـإن مـزقـتـنـا سني الــحـيـاة * * * فإنـا مع الـنصـر فـي مـوعــد

#6

لطباعة تقرير احذف من الكود السابق :

  Set DataGrid1.DataSource = Rec

و اضف بدلاً منه السطرين :

    Set DataReport111.DataSource = Rec
    DataReport111.Show

والله أعلم

أخي سوف تبكي عليك العيون * * * وتـسـأل عـنك دمـوع المـئـين

فإن جف دمعي سيبكي الغمام * * * يـرصـع قـبرك بــالـياسـمـيـن

أخـي مـا يـأسـنـا ولـن نيـأسـا * * * وما طال في القلب لبث الأسى

ومـا حـل أفــئــدة الــمــــؤمـن * * * سـوى أمـل في الـجنـان رسـى

أخي فانتظر ولتعش في غـد * * * سـيـنـبـثـق الأمـل الـسـرمـد

فـإن مـزقـتـنـا سني الــحـيـاة * * * فإنـا مع الـنصـر فـي مـوعــد

هذا الموضوع مغلق.

مواضيع مشابهة