enviar un campo memo a word

daniel
20 de Mayo del 2005
hola, soy un usuario novato y necesito que me ayuden a enviar un campo memo a word, utilzo el fox 6.0, gracias por la ayuda que me puedan prestar

Daniel
20 de Mayo del 2005

With oRange
.Style = oDocument.Styles["memora"]
* .ParagraphFormat.Alignment=Izquierda
.InsertAfter("MEMORÁNDUM Nº " + thisform.folin.caption + "/2004-2005" + CR)
.InsertAfter("Monterrey, Nuevo León, a "+CFECHA(CORREO.FEC_TURNA)+CR+CR+CR)
.Collapse(wdCollapse)
.Style = oDocument.Styles["de_para"]
.InsertAfter("PARA : "+tabula+Thisform.lst_para.listitem(1)+cr)
if thisform.lst_para.listcount>1
for t=2 to thisform.lst_para.listcount
.InsertAfter(tabula+tabula+Thisform.lst_para.listitem(t)+cr+cr)
Endfor
endif
.InsertAfter("DE : "+tabula+tabula+Thisform.cmb_de.value+cr+cr+cr+tabula)
.Collapse(wdCollapse)
.Style = oDocument.Styles["cuerpo"] && estilo declarado directamente en una maketa en word la maketa se llama memo.doc
.InsertAfter(thisform.Introduccion.value)m && aqui va el campo memo traido desde un editbox en el formulario.
EndWith