>It puts the text into the next section instead of at the end of section 1.
>
>Any ideas ?
>
>
>oWord = CreateObject("Word.Application")
>oWord.visible = .t.
>oDocument = oWord.Documents.Add("Tap.dot")
>
>oRange = oDocument.Sections[1].Range
oRange.Collapse(wdCollapseEnd) && need to move to the end of the range
>oRange.InsertBefore("ABC"+chr(13))
>oRange.InsertAfter("XYZ")
Rip Ryness
International Falls, MN