>>Hello Lou Harris,
>>
>> I Thank you to try help me but i did what you write to me and i didn't success, but the VFP don't shows me a error message and my word document don't had changes
>>
>>thanks
>Hi Ander,oWordDocument=createobject("word.application") && Create word object
>with oWordDocument
> with oWordDocument.wordbasic
> .appshow
> .fileopen("c:\temp\ander.doc")
> endwith
> .ActiveDocument.variables("Cidade").value = "Porto Allegre"
> For ix= 1 to .ActiveDocument.Fields.count
> if at("Cidade",.ActiveDocument.Fields(ix).Code.text) > 0
> .ActiveDocument.Fields(ix).Update
> EndIf
> Next
>endwith
>Cetin