FoxPro/Visual FoxPro - Como pasar campos memo de Visual Foxpro a ms word

Hola amigos: espero que alguin pueda ayudarme, tengo una tabla que contiene campos memo (mas de 2000 registros) y quiero pasarlos a word para crear un documento, puede alguin incarme como hacerlo?. de antemano les estoy agradecido. Saludos

Local loWord as "Word.Application"
loWord = CREATEOBJECT("Word.Application")
loWord.Documents.Add()
loRange = loWord.ActiveDocument.Range()
SELECT DatEnMemo
Scan
loRange.InsertAfter(DatEnMemo.Datos + ' ') && De cada registro de la tabla DatEnMemo, del campo memo (Datos), se inserta el texto
EndScan
loWord.ActiveDocument.SaveAs("C:\Documents and Settings\usuario\Mis documentos\Prueba.docx") && Se guarda todo el texto insertado en Prueba.docx
*loWord.PrintOut() && Muestra el Archivo Prueba.docx
loWord.Quit()
release loRange, loWord

No funciona en VFP6 que puedo hacer?

Muy bueno el código para pasar textos de un campo memo a word, me resultó con msword 2010 . Ya en el word puedo imprimirlo como mejor de guste, tamaño y tipo de letra, espaciado, etc. GRACIAS