اريد اداة مجانيه لتحويل Rtf To Htm

هذا رابط يمكن يفيدك ,

http://www.codeproje.../RTFToHTML.aspx

شكرا لك اخي لكن جربته ولم يفي بالغرض

شكرا لك

ممكن حل اخر !!

هذا  كود لقيته , بس ما جربته لأن ماعندي البرنامج  .. ,

أرفقته في مفكرة ,

إن شآء الله ينفع :) ,

convert.txt

شكرا لك اخي انا اعرف هذا الكود وهو شغال ميه الميه لكن ينقصه شيئ واحد وهو انه لا يحول مكان النص بمعني انك اذا وضعت النص في اليمين اي خاصية Algin = Right يظهر دائما في اليسار

وشكرا

طيب جربي هذا ,

وللأمانه منقول :)

convert2.txt

اخي شكرا لك

بس الكود يحول كل النص اما الى المنتصف او كله الى اليمين او اليسار انا من كتب هذا الكود في منتدى vb4arab

على العموم شكرا لك لا اريد ان اتعبك معي

:ty:

مرحبا

انني افعل ذلك عن طريق Automation. جربها

 ' ضع ما تريد من كتابة في RichText 
 	Const WDformatHTML = 8

 	'حفظ الكتابة على HDD
 	Me.RichTextBox1.SaveFile("c:\xxx.rtf",RichTextBoxStreamType.RichText)

 	Dim oWord As new Microsoft.Office.Interop.Word.Application
 	oWord.Visible=False
 	' فتح الملف ب office Word
 	oWord.Documents.Open("c:\xxx.rtf")

 	' حفظ الملف من word الى HTML
 	oWord.ActiveDocument.SaveAs("c:\xxx.html",WDformatHTML)
 	oWord.Quit(false)

 	' فتح html بال Internet Explorer
 	WebBrowser1.Navigate("c:\xxx.html")
 	While WebBrowser1.ReadyState <> 4 
 	Application.DoEvents
 	End While

 	' استخراج ال html
 	dim HTML = WebBrowser1.Document.Body.InnerHtml.ToString
 	MsgBox(HTML)

شكرا لك اخي لكن هذا الكود يحتاج الى وجود الوورد في جهاز المستخدم

شكرا