27-04-13, 08:39 AM
السلام عليكم ..
عذراً على كثرة الاسئلة ولاكن مالي بعد الله سبحانه ألا انتو الله يحفظكم ..
أخواني أنا مشكلتي أبي احفظ الداتا قريد فيو على ملف مفكرة ( txt )
وهذا الكود اللي استخدمة
لاكن المشكلة إذا حفظ وفتحت المفكرة ( txt ) يجيني مثل كذا
المختصر أنه يكرر نفس البيانات وما يعطيني كل البيانات اللي بالداتا قريد فيو
أتمنى مساعدتي بارك الله فيكم ..
عذراً على كثرة الاسئلة ولاكن مالي بعد الله سبحانه ألا انتو الله يحفظكم ..
أخواني أنا مشكلتي أبي احفظ الداتا قريد فيو على ملف مفكرة ( 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
مشكلة الجهاز : لم يتم تثبيت برنامج التشغيل لهذا الجهاز - جهاز غير معروف
المختصر أنه يكرر نفس البيانات وما يعطيني كل البيانات اللي بالداتا قريد فيو
أتمنى مساعدتي بارك الله فيكم ..