>Trying to automate that if a particular document isn't found, get the template and do a FileSaveAs and create it. Using oword.createobject("Word.Application"), and can open the file (Documents.open) but there's no SaveAs there. Used the Object Browser and found under "Document" a SaveAs, but can't get it to work. Not sure what I'm doing wrong. Really need to know how to change directories, FileSaveAs and run macros. Can Someone help? (God Bless whoever responds!)

---

Mary,
SaveAs method applies to Document object. Below sample code works with w97 and up and any version VFP :

PUBLIC oWord

*** set the LOCALEID to English
nlLocaleId=sys(3004)	&& Save local id
=sys(3006,1033)		&& We will be sending instructions in English
USE customer		&& test table
Application.datatoclip()
WAIT window nowait "Creating Word Document..."

oWord=createobject("word.application")	&& Create word object
WITH oWord
  .documents.add        	&& New file, default template
  .Selection.Paste
  .Selection.Goto(-1,,,"\StartOfDoc")
  #DEFINE wdDialogEditReplace 117
  WITH .dialogs(wdDialogEditReplace)
    .Find = "Owner"
    .Replace = "Çetin"
    .MatchCase = .f.
    .ReplaceAll = .t.
    .Execute
  ENDWITH
  .ActiveDocument.SaveAs("c:\temp\test.doc")
  .ActiveDocument.Close(-1)
  .Quit
ENDWITH
WAIT clear

Cetin