تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة تكرار البيانات في الداتا قريد فيو
#1
السلام عليكم ..

عذراً على كثرة الاسئلة ولاكن مالي بعد الله سبحانه ألا انتو الله يحفظكم ..

أخواني أنا مشكلتي أبي احفظ الداتا قريد فيو على ملف مفكرة ( txt )

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

كود :
Dim myCoolFile_7 As String = Application.StartupPath & "\تقرير إدارة الأجهزة.txt"
        Dim myWriter_7 As New IO.StreamWriter(myCoolFile_7)

For Each myItem_7 As DataGridViewRow In DataGridView1.Rows
            myWriter_7.WriteLine("")
            myWriter_7.WriteLine("أسم الجهاز : " & DataGridView1.Rows(0).Cells(0).Value)
            myWriter_7.WriteLine("المعرف : " & DataGridView1.Rows(0).Cells(1).Value)
            myWriter_7.WriteLine("مشكلة الجهاز : " & DataGridView1.Rows(0).Cells(2).Value)
        Next

لاكن المشكلة إذا حفظ وفتحت المفكرة ( txt ) يجيني مثل كذا

كود :
أسم الجهاز : ‏‏وحدة تحكم الناقل التسلسلي العالمي (USB‏)
المعرف : PCI\VEN_1033&DEV_0194&SUBSYS_84131043&REV_04\4&DDEC341&0&00E1
مشكلة الجهاز : لم يتم تثبيت برنامج التشغيل لهذا الجهاز - جهاز غير معروف

ــــــــــــــــــــــــ

أسم الجهاز : ‏‏وحدة تحكم الناقل التسلسلي العالمي (USB‏)
المعرف : PCI\VEN_1033&DEV_0194&SUBSYS_84131043&REV_04\4&DDEC341&0&00E1
مشكلة الجهاز : لم يتم تثبيت برنامج التشغيل لهذا الجهاز - جهاز غير معروف

المختصر أنه يكرر نفس البيانات وما يعطيني كل البيانات اللي بالداتا قريد فيو

أتمنى مساعدتي بارك الله فيكم ..
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

برجاء ارفاق المثال للتعديل عليه
الرد }}}}
تم الشكر بواسطة:
#3
انظر الرد التالي

حذث خطأ في الرد والصحيح في الرد التالي
الرد }}}}
تم الشكر بواسطة:
#4
جرب الجملة كالتالي

كود :
for i as integer = 0 to DataGridView1.Rows.count-1
myWriter_7.WriteLine("")
            myWriter_7.WriteLine("أسم الجهاز : " & DataGridView1.Rows(i).Cells(0).Value)
            myWriter_7.WriteLine("المعرف : " & DataGridView1.Rows(i).Cells(1).Value)
            myWriter_7.WriteLine("مشكلة الجهاز : " & DataGridView1.Rows(i).Cells(2).Value)
        Next

لأن من الواضح ان في الداتا جريد فيو عندك أكثر من صف فبهذا الكود يعطيك كل صف وبياناته

أما في الكود السابق فهو يعد الصفوف ولكن يعطي الناتج بيانات أول صف فقط بعدد صفوف الداتا جريد

يعني لو عندك في الداتا جريد فيو 10 صفوف سوف يأخذ أو صف فقط ويظل يكرره 10 مرات

أما في الجديد فسيأخذ طل صف ويضع بياناته

أما لو أردت عرض بيانات أول صف فقط فلا تعمل Loop

كود :
myWriter_7.WriteLine("")
            myWriter_7.WriteLine("أسم الجهاز : " & DataGridView1.Rows(0).Cells(0).Value)
            myWriter_7.WriteLine("المعرف : " & DataGridView1.Rows(0).Cells(1).Value)
            myWriter_7.WriteLine("مشكلة الجهاز : " & DataGridView1.Rows(0).Cells(2).Value)
الرد }}}}
تم الشكر بواسطة:
#5
أخوي sajad الله يعطيك الصحة والعافية ما قصرت ..

أخوي أحمد بيض الله وجهك والكود ضبط وما قصرت يا غالي ..

والشكر موصول للجميع ..

الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة بسيطة جداً timer 3asfa~mdmra 4 87 15-01-17, 10:09 PM
آخر رد: 3asfa~mdmra
  [VB.NET] سوال مشكلة في اخذ نسخة احتياطية من قاعدة بيانات SQL كفاح 4 87 14-01-17, 08:19 PM
آخر رد: كفاح
  استفسار عن الجداول المتعددة في قاعدة البيانات اكسس أبووسم 4 102 14-01-17, 12:36 PM
آخر رد: أبووسم
  ياشباب ارجو منكم المساعده لدي مشاكل في اضافه الصورة الى قاعده البيانات وعمل بحث ammar ali 3 152 13-01-17, 11:15 PM
آخر رد: ammaraliali
  [VB.NET] استقبال البيانات عن طريق serail port engmedomed@gmail.com 1 63 11-01-17, 02:13 AM
آخر رد: مساعدة
  [VB.NET] مشكلة في تغيير لون خلفية الخلية في ال Datagridview Joe kad 10 228 09-01-17, 02:01 AM
آخر رد: مساعدة
  [VB.NET] مشكلة تحويل من 32بت الى 64 بت yemen1 3 92 08-01-17, 01:23 PM
آخر رد: yemen1
  تصدير البيانات الى PDF باستخدام ITextSharp لايدعم اللغة العربية فاطمة غ 8 341 04-01-17, 12:00 AM
آخر رد: مساعدة
  [سؤال] مشكلة في انشاء مشروع عبدالرحمن المكاوي 4 109 01-01-17, 02:44 PM
آخر رد: عبدالرحمن المكاوي
  تغيير قاعدة البيانات الى .bak صبري زينوبي 5 125 01-01-17, 02:33 PM
آخر رد: صبري زينوبي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم