اخواني الاعزاء
كود :
<p id="aname">
saud
</p>
كيف نستبدل الاسم saud في هذه الجملة باستخدام HtmlAgilityPack
احضرت الاسم بهذا الكود
كود :
Dim n As HtmlAgilityPack.HtmlNode = doc.GetElementbyId("aname")
فكيف اغير الواقع بين الوسمين؟
خلاص يئست من اكمال مقترح طباعة تقرير مخصص
اتمنى حل هالمعضلة
نحمده ونصلي على رسوله الكريم
استخدم innertext و innerhtml
(11-04-14, 03:33 AM)ربيع كتب : [ -> ]نحمده ونصلي على رسوله الكريم
استخدم innertext و innerhtml
للقراءة فقط لا استطيع التعديل والاستبدال بهاتين الخاصيتين
(11-04-14, 03:39 AM)الشاكي لله كتب : [ -> ]
ما يقبل اخوي .. يقول للقراءة فقط
كود :
Dim hweb As New HtmlAgilityPack.HtmlWeb
Dim doc As New HtmlAgilityPack.HtmlDocument
doc.Load(Application.StartupPath & "\aprint.htm")
'احضار ارتباط الصورة لتحديث القيمة
Dim nod As HtmlAgilityPack.HtmlNode = doc.GetElementbyId("pic")
Dim src As HtmlAgilityPack.HtmlAttribute = nod.Attributes("src")
nod.SetAttributeValue("src", "pics/" & picname)
'-------------------------------------
'Dim n As HtmlAgilityPack.HtmlNode = doc.GetElementbyId("aname")
Dim nod1 As HtmlAgilityPack.HtmlNode = doc.DocumentNode.SelectSingleNode("//p[@id]")
MsgBox(nod1.InnerText)
doc.Save(Application.StartupPath & "\aprint.htm")
هذا الكود كامل
آسف InnerText هي ReadOnly
البديل هو : InnerHtml
(11-04-14, 04:16 AM)الشاكي لله كتب : [ -> ]آسف InnerText هي ReadOnly
البديل هو : InnerHtml
تسلم يابطل
الفكرة انتهت الان بقيت تجربة الطباعة