تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
معلومة ::: Read From Xml File
#1
كاتب الموضوع : BADRMEDIA

عندك ملف Xml وتريد القراءة منه

إذن سنستخدم القارئ XmlReader


لنري هذا المثال :


================================================== =

أنشأ على القرص المحلي C ملف Xml باسم VB4ARAB.Xml


اكتب فى محتواه



كود :
[color=#000080]<?xml version=[COLOR=#0000ff]"1.0"[/color] encoding=[color=#0000ff]"utf-8"[/color]?>[/COLOR]
[i][color=#000080]<!--BADRMEDIA-->[/color][/i]
[color=#000080]<Address_Lists>[/color]
[color=#000080]<AddressList ID=[COLOR=#0000ff]"111"[/color]>[/COLOR]
[color=#000080]<ZIP_CODE>[/color]123-4567[color=#000080]</ZIP_CODE>[/color]
[color=#000080]<ADDRESS>[/color]BADRMEDIA[color=#000080]</ADDRESS>[/color]
[color=#000080]</AddressList>[/color]
[color=#000080]<AddressList ID=[COLOR=#0000ff]"222"[/color]>[/COLOR]
[color=#000080]<ZIP_CODE>[/color]333-7777[color=#000080]</ZIP_CODE>[/color]
[color=#000080]<ADDRESS>[/color]BADRMEDIA[color=#000080]</ADDRESS>[/color]
[color=#000080]</AddressList>[/color]
[color=#000080]<AddressList ID=[COLOR=#0000ff]"333"[/color]>[/COLOR]
[color=#000080]<ZIP_CODE>[/color]111-2222[color=#000080]</ZIP_CODE>[/color]
[color=#000080]<ADDRESS>[/color]BADRMEDIA[color=#000080]</ADDRESS>[/color]
[color=#000080]</AddressList>[/color]
[color=#000080]</Address_Lists>[/color]

لتجعل وجود فراغ فى صفحة Xml لأول سطر


أضف زر أمر Button واضف له هذا الكود



كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Try
Dim reader As System.Xml.XmlReader = System.Xml.XmlReader.Create("C:\VB4ARAB.xml")
While reader.Read
If reader.NodeType = Xml.XmlNodeType.Element Then
' نظهر اسم العنصر
MsgBox(reader.LocalName)
End If
End While
' نغلق الاتصال
reader.Close()
Catch ex As Exception
MsgBox("" & ex.Message & "", MsgBoxStyle.Exclamation + MsgBoxStyle.MsgBoxRtlReading + MsgBoxStyle.MsgBoxRight, "BADRMEDIA SoftWare ")
End Try

End Sub


أعتقد الكود واضح وما يحتاج لشرح
}}}}
تم الشكر بواسطة:
#2
فى الكود السابق ماذا لو أردت قراءة عنصر محدد


طبعاً نحن نضع جملة شرطية للقراءة



كود :
If reader.NodeType = Xml.XmlNodeType.Element Then

كل ما فى الأمر أنك ستزيد الشرط

مثلاً قراءة أى حقل لعنصر ZIP_CODE


كود :
If reader.NodeType = Xml.XmlNodeType.Element And reader.LocalName = "ZIP_CODE" Then
}}}}
تم الشكر بواسطة:
#3
هناك شئ فى الكود السابق

أنت تريد أن تقرأ النص فى الحقل وهذا الكود لا يحقق ذلك


كود :
MsgBox(reader.LocalName
)

فبدلاً من LocalName استخدم الخاصية ReadString



كود :
MsgBox(reader.ReadString)
}}}}
تم الشكر بواسطة:
#4
حاول تتعرف على الخصائص للعنصر XmlReader أكثر وتطبيق ذلك

إن شاء الله راح نشرح كيفية التعامل مع العنصر XmlWriter أيضاً
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  معلومة ::: ListBox Blue Sky 14 2,419 14-11-16, 11:32 PM
آخر رد: فارس جراح
  File Signature silverlight 5 296 08-11-16, 09:34 AM
آخر رد: myalsailamy
  [مقال] Check the file format of an Image silverlight 3 890 28-05-14, 05:02 PM
آخر رد: Sajad
  save rtf file in database محمد عمر مصطفى 0 747 21-12-13, 02:50 AM
آخر رد: محمد عمر مصطفى
  معلومة مهمه فى المصفوفات ali.alfoly 2 794 30-08-13, 02:25 AM
آخر رد: ali.alfoly
  من المنتدى القديم - معلومة ::: ProgressBar ( للاخ BADRMEDIA ) المبرمج علي نوري 2 1,267 23-08-13, 11:17 PM
آخر رد: nin9e
  معلومة :: تعلم كيف تحفظ صورة في My.Settings بدون الإحتياج إلى مسارها! أسامة أحمد 3 1,022 16-12-12, 06:25 PM
آخر رد: 3amo
  من المنتدى القديم - معلومة ::: CheckBox ( للاخ BADRMEDIA ) المبرمج علي نوري 1 572 30-11-12, 05:54 PM
آخر رد: مبرمج أوتار
  معلومة :: الحل لمشكلة الخطأ في الكود For Each i As Button In Me.Controls Aly El-Haddad 2 680 10-11-12, 09:15 PM
آخر رد: Mr. DotNet
  معلومة : Partial Class RaggiTech 1 545 06-10-12, 11:03 PM
آخر رد: RaggiTech

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


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