تقييم الموضوع :
  • 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 بايت / التحميلات : 11)
الرد }}}}
تم الشكر بواسطة:
#2
أخي الفاضل :
هل انت متأكد من مسار الملف ؟؟

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

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

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


الملفات المرفقة
.rar   test.rar (الحجم : 57.32 ك ب / التحميلات : 7)
.rar   xml.rar (الحجم : 242 بايت / التحميلات : 2)
الرد }}}}
تم الشكر بواسطة:
#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
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشروع صغير لبيانات الموظفين ارجو التعديل علية a.baomar 5 175 23-05-17, 04:58 AM
آخر رد: a.baomar
  [VB.NET] كود التعديل في sql sal5033 1 48 19-05-17, 04:05 PM
آخر رد: alma2
  محتاج كود صغير للتاكد واختبار القيمة المدخلة في ( TEXTBOX) mohammed.gadain61 8 227 25-04-17, 04:05 AM
آخر رد: عبـدالله
  طلب صغير جمع عامود من جدول واضهار النتيجة في تكست بوكس nmst70 3 154 21-04-17, 02:35 AM
آخر رد: momiana1
  السلام عليكم احتاج مساعدة بكود اختبار صغير داخل داتا جيرد mohammed.gadain61 4 106 16-04-17, 03:38 AM
آخر رد: mohammed.gadain61
  التعديل على حقل كويد بسكول سيرفر العواد الصغير 2 72 12-04-17, 12:53 PM
آخر رد: العواد الصغير
  طلب التعديل على المشروع MOSTAFA.KAMEL 0 99 14-03-17, 05:11 PM
آخر رد: MOSTAFA.KAMEL
  استسفسار حول التعديل على فاتورة المشتريات والقيمة المتألق9 0 91 08-03-17, 03:13 PM
آخر رد: المتألق9
Information حفظ التعديل فى الجريد فيو الحزين اوى 1 125 07-03-17, 01:53 AM
آخر رد: مساعدة
  [VB.NET] خطأ في الكود ...مرفق مع المشروع....يرجي التعديل فقط 3asfa~mdmra 2 164 02-03-17, 04:26 PM
آخر رد: 3asfa~mdmra

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


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