تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
خطأ صغير فى كود التعديل على ملف xml
#1
اولآ تم تجربة الكود بهذا الشكل

كود :
       Dim xmlInitial As String = "<Test>" & vbCr & vbLf & "<test name='ahmed' age='20'>" & vbCr & vbLf & "  </test>" & vbCr & vbLf & " </Test>"
       MsgBox(xmlInitial)
       Dim xmlUser As String = "<test name='mohamed' age='20'>" & vbCr & vbLf & " </test>"
       Dim originalXml As New XmlDocument()
       Dim targetNode As String = "descendant::*[name(.) ='test'] [@age='20']"
       'originalXml.LoadXml(Path)
       originalXml.LoadXml(xmlUser)
       Dim editNode As XmlNode = originalXml.SelectSingleNode(targetNode)
       Dim fragment As XmlDocumentFragment = originalXml.CreateDocumentFragment()
       fragment.InnerXml = xmlUser
       editNode.ParentNode.ReplaceChild(fragment, editNode)
       'originalXml.Save(Path)
       MsgBox(originalXml.OuterXml)
 لاكن عند التعديل ليعمل بهذا الشكل
كود :
       Dim xmlUser As String = "<test name='mohamed' age='20'>" & vbCr & vbLf & " </test>"
       Dim originalXml As New XmlDocument()
       originalXml.LoadXml(Path)
       Dim editNode As XmlNode = originalXml.SelectSingleNode("//Test//test[@name='Ahmed'] [@age='20']")
       Dim fragment As XmlDocumentFragment = originalXml.CreateDocumentFragment()
       fragment.InnerXml = xmlUser
       editNode.ParentNode.ReplaceChild(fragment, editNode)
       originalXml.Save(Path)
يعطي خطأ فى originalXml.LoadXml(Path)

كود :
Dim Path As String = Application.StartupPath + "\test.xml"
غالبآ يمكن الخطأ من ملف xml , فى المرفق


الملفات المرفقة
.rar   test.rar (الحجم : 208 بايت / التحميلات : 20)
الرد }}}}
تم الشكر بواسطة:
#2
أخي الفاضل :
هل انت متأكد من مسار الملف ؟؟

ويفضل رفع المشروع
الرد }}}}
تم الشكر بواسطة:
#3
(15-07-16, 07:41 PM)boudyonline كتب : أخي الفاضل :
هل انت متأكد من مسار الملف ؟؟

ويفضل رفع المشروع

اجل المسار صحيح تم التعديل قليلآ فى ملف xml


الملفات المرفقة
.rar   test.rar (الحجم : 57.32 ك ب / التحميلات : 16)
.rar   xml.rar (الحجم : 242 بايت / التحميلات : 11)
الرد }}}}
تم الشكر بواسطة:
#4
أخي الفاضل :

إذا كان الكود الأول يعمل بطريقة صحيحة ... فما هي الفائدة في استخدام الكود الثاني ؟
الرد }}}}
تم الشكر بواسطة:
#5
(16-07-16, 05:26 PM)boudyonline كتب : أخي الفاضل :

إذا كان الكود الأول يعمل بطريقة صحيحة ... فما هي الفائدة في استخدام الكود الثاني ؟

للاضافة من xml 
تم الحل بواسطة وضع هذه الاكواد
كود :
   Dim fileName As String = IO.Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "test.xml")
      If IO.File.Exists(fileName) Then
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مطلوب التعديل علي الكود التالي محمد اسماعيل 2 65 11-10-17, 01:08 PM
آخر رد: محمد اسماعيل
  [VB.NET] التعديل على الكود - رقم التسلسلي dubai.eig 4 132 08-10-17, 11:30 PM
آخر رد: dubai.eig
  [VB.NET] اريد التعديل علي المديول التالي محمد اسماعيل 2 65 08-10-17, 07:37 PM
آخر رد: محمد اسماعيل
  [VB.NET] التعديل على الكود ليتناسق ما اريده 0theghost0 4 130 17-09-17, 03:35 PM
آخر رد: 0theghost0
  [VB.NET] لدي مشكلة مع كود التعديل 0theghost0 13 213 09-09-17, 05:24 PM
آخر رد: ola
  استسفسار حول التعديل على فاتورة المشتريات والقيمة المتألق9 1 199 22-08-17, 02:47 PM
آخر رد: نبيل كونكت
  [مشروع] دعونا نصنع مشروع صغير ومفيد للكل وكل شخص يحط افكاره فيه 0theghost0 15 591 05-08-17, 07:21 PM
آخر رد: 0theghost0
  [VB.NET] اريد التعديل على الكود 0theghost0 2 112 04-08-17, 08:18 PM
آخر رد: 0theghost0
  [VB.NET] الرجاء التعديل ع كود الفترة التجريبة للبرنامج +سريال e-coder 1 143 04-08-17, 08:21 AM
آخر رد: zinom
  [VB.NET] ارجو المساعدة في مشروع صغير لكن راح يكون مفيد للجميع . 0theghost0 1 130 02-08-17, 11:50 PM
آخر رد: silverlight

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


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