Hi Borislav,

Here's the chunk of code that actually does the merge...

oWord = Createobject("Word.Application")
		oWord.Visible = .T.



		oDoc = oWord.Documents.Open(Curdir()+"form_letters\"+pdocument)
		oDoc.MailMerge.MainDocumentType = 0
		oDoc.MailMerge.OpenDataSource(lcSourceDoc)

*!*			oDoc.MailMerge.Datasource.FirstRecord =  oDoc.MailMerge.Datasource.ActiveRecord
*!*			oDoc.MailMerge.Datasource.LastRecord = oDoc.MailMerge.Datasource.ActiveRecord


		oDoc.Activate && Make it the active foreground app
		oWord.ActiveDocument.ActiveWindow.View.ShowFieldCodes = .F.

I hope that helps.