>Hello,
>
>Is there anybody who can help met kick-start with Word-Ole, because I need to fill the company name in a Word order document. Can I use the word fields, or is there a better way???
>
>Please help, any word ole example is appreciated...
>TIA
>Greetings,
>Jean-Pierre
Here word ole that use to open a file. I hope it can help you.
MyOLe = CREATEOBJECT("Word.Basic")
lsLanguage = MyOLe.appInfo(16) && Test if Word is french or english
DO CASE
CASE lsLanguage = "Français"
lsFileOpen = "MyOLe.FichierOuvrir"
lsAppMinimize = "MyOLe.FenAppRéduction"
lsAppActivate = "MyOLe.AppActiver"
CASE lsLanguage = "English"
lsFileOpen = "MyOLe.FileOpen"
lsAppMinimize = "MyOLe.AppMinimize"
lsAppActivate = "MyOLe.AppActivate"
OTHERWISE
RETURN
ENDCASE
MyFile = "c:\temp\temp.doc"
MyFile = ["] + MyFile + ["]
&lsFileOpen. (MyFile, 0) && Modele, nouvModel
bMyMinimize = IIF (&lsAppMinimize.() = 0, .F., .T.)
IF bMyMinimize
&AppMinimize. && Fera un restore
ENDIF
&lsAppActivate. ("",1) && le 1 indique le moment, 1 -> now