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

مشكلة الاداة MSHflexgrid لاتقبل اثر من 2048 صف

مغلق
بدأه عبدالجليل العقوري في 11 أغسطس 2007 · 4 رد · 829 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

اخوتي الاعزاء استخدمت الاداة MSHflexgrid1 ولكن الذي حصل لي ان عدد سجلاتي اكثر من 3000 سجل و الاداه MSHflexgrid1تعرض لي 2048 + صف العناوين أي 2049 صف فقط

وانا متاكد من عدد السجلات التي ترجع بها جملة sql ولايوجد أي خطاء عند التنفيذ حتى اني جعلت من عدد الصفوف = 4000 ولكن عند استخدام الربط DataSource اختبر عدد الصفوف اجد انها نقصت واصبحت 2048 صف

ازيدكم !!!!!!!!!

ربطت بالداتا غريد واشتغلت تمام واظهرت لي جميع الصفوف

ما هو سبب المشكلة

والكود المستخدم هو الاتي

Dim db As New ADODB.Connection
   Dim rs As New ADODB.Recordset

   db.Provider = "Microsoft.Jet.OLEDB.4.0;"
   db.Open App.Path & "\Data.mdb"

   rs.Open "SELECT * From TEBEL1", db, adOpenStatic, adLockOptimistic

   Set MSHflexgrid1.DataSource = rs

الرجاء ادخال :D الى قلبي

تم تعديل هذه المشاركة بواسطة عبدالجليل العقوري في 11 أغسطس 2007 في 23:46

"نحن لا نستسلم... ننتصر أو نموت.... وهذه ليست النهاية... بل سيكون عليكم أن تحاربوا الجيل القادم والاجيال التي تليه... اما أنا... فإن عمري سيكون أطول من عمر شانقي."

عمر المختار

اللهم انعم على بلادي بالأمن والأمان

#2

طيب خلاص خليك من الفيلكس وروح للداتا وشكرا على المعلومة.

google.gif

spamxk4.gif

petitionbanner17a.gif

Email : sao_-5000@hotmail.com

#3

جرب دى : LynxGrid v1.89 (owner-drawn editable grid)

إقرأ معى:

melal.jpg

----

المثقفون العرب .. المزورون العرب: تأبين محمود درويش نموذجا

ماذا خسر العالم بانحطاط المسلمين ؟!! للعلامه: أبو الحسن الندوى (كتاب هام لكل مسلم).

المنهجية ومقدمات في الطلب (لطلاب العلم الشرعى)

#4

السلام عليكم

الاخ سعيد الاداه MSHflexgrid اقوى واجمل من datagred ولكن يبدوا ان المشكلة في استخدام DataSource مع MSHflexgrid

وانا متاكد من وجود حل لهذه المشكلة

الاخ msayd2004 جاري التحميل

"نحن لا نستسلم... ننتصر أو نموت.... وهذه ليست النهاية... بل سيكون عليكم أن تحاربوا الجيل القادم والاجيال التي تليه... اما أنا... فإن عمري سيكون أطول من عمر شانقي."

عمر المختار

اللهم انعم على بلادي بالأمن والأمان

#5

جربت الكود التالي ولم يظهر ما تتكلم عنه ان هذا الكود بظهر جميع الصفوف

ضع الاداة MSHFlexGrid1 على الفورم 

Private Sub Form_Load()
Dim rs As New Recordset
rs.Fields.Append "id", adInteger
rs.Fields.Append "id1", adInteger
rs.Fields.Append "id2", adInteger
rs.Fields.Append "id3", adInteger
rs.Fields.Append "id4", adVarChar, 50
rs.Open
Dim i As Long
For i = 0 To 15500
rs.AddNew
rs(0) = i
rs(1) = i
rs(2) = i
rs(3) = i
rs(4) = "tareqVB"
rs.Update


Next
Set MSHFlexGrid1.DataSource = rs
'MSHFlexGrid1.Refresh
End Sub

myblog.jpeg

مدونتي

استضافة مواقع asp.net :.Net 3.5,4,4.5, MVC2 & 3,SQL server 2008 R2, Crystal reports

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…