+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : خطأ صغير فى كود التعديل على ملف xml (/showthread.php?tid=16452)
خطأ صغير فى كود التعديل على ملف xml - أسامة - 15-07-16
اولآ تم تجربة الكود بهذا الشكل
كود :
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)كود :
Dim Path As String = Application.StartupPath + "\test.xml"RE: خطأ صغير فى كود التعديل على ملف xml - boudyonline - 15-07-16
أخي الفاضل :
هل انت متأكد من مسار الملف ؟؟
ويفضل رفع المشروع
RE: خطأ صغير فى كود التعديل على ملف xml - أسامة - 15-07-16
(15-07-16, 07:41 PM)boudyonline كتب : أخي الفاضل :
هل انت متأكد من مسار الملف ؟؟
ويفضل رفع المشروع
اجل المسار صحيح تم التعديل قليلآ فى ملف xml
RE: خطأ صغير فى كود التعديل على ملف xml - boudyonline - 16-07-16
أخي الفاضل :
إذا كان الكود الأول يعمل بطريقة صحيحة ... فما هي الفائدة في استخدام الكود الثاني ؟
RE: خطأ صغير فى كود التعديل على ملف xml - أسامة - 16-07-16
(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