Add a reference to Microsoft Word 8.0 (or select the highest version you have installed) Object Library. Then use something like this:
Code:Dim oWord As New Word.Application Dim oDoc As Word.Document Set oDoc = oWord.Documents.Open("F:\MyFile.rtf") oWord.Visible = True
------------------
Serge
Software Developer
[email protected]
[email protected]
ICQ#: 51055819




Reply With Quote