QTP Script to append an existing MS Word document at the end of document-VB Script to append an existing MS Word document at the end of document

QTP Script to append an existing MS Word document at the end of document.





set a=createobject("Word.Application")

a.visible=true

a.Documents.open("C:\qtp.doc")

a.Selection.EndKey 6,0

a.Selection.TypeText "new text added at end"

a.ActiveDocument.Save