منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مثال لتصدير DataGridView Rows Content الى ملف xml
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله و بركاته
http://vb4arb.com/vb/showthread.php?tid=35071

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




(01-06-20, 05:46 PM)سعود كتب : [ -> ]من نفس الداتاست يمكن عمل تصدير الى ملف xml وبعد ذلك يمكن فتح هذا الملف من الاكسيل ويتم تحويله الى ملف اكسيل متكامل.

انا عايزة احدد سجلات في داتا جريد و اصدره الى ملف اكسل يعني من نافذة الفورم نفسه 

وشكرا لك على الاستجابة

فاهم لكن اقصد ان نستعين بتقنية جاهزة افضل من سرد اسطر متعددة لاتمام الامر.
الفكرة باختصار (لننسى الان الربط بمصدر بيانات) 
نعمل داتا تيبل وقت التشغيل وايضا داتاست نعبيء الداتاتيبل من شبيكة البيانات ثم نجعل الداتاست تشمل الداتاتيبل وبعد ذلك نعمل wriitetoxml ونكتب مسار ملف xml
اذا لم تتضح الفكرة بعد ممكن اعمل مثال على السريع.
لكن الافضل لو تقوم برفع مالديك من مثال حتى نكتب اكواد مناسبة لطريقتك في البرمجة.

















لقد نسيت تصدير المحدد لكن ساعدل عليه ان شاء الله لان الامر بسيط

كود تصدير المحدد
PHP كود :
 Dim ds As New DataSet
        Dim dt 
As New DataTable
        dt
.Columns.Add("Tid"GetType(Integer))
 
       dt.Columns.Add("Tday"GetType(String))

 
       Dim i As Integer
        For i 
0 To d.Rows.Count IIf(d.AllowUserToAddRows21)
 
           If d.Rows(i).Selected Then
                Dim row 
As DataRow dt.NewRow
                row
(0) = d.Rows(i).Cells(0).Value
                row
(1) = d.Rows(i).Cells(1).Value
                dt
.Rows.Add(row)
 
           End If
 
       Next
        ds
.Tables.Add(dt)
 
       ds.WriteXml(CurDir() & "\a.xml"
WriteToXml.zip