Ole Error Code 0x800706ba The RPC server is unavaliable.

BTW my family is from Greensboro...

>>The do some stuff is using bookmarks to put some data into the template. The user prints it, then closes the template and word then goes back to the VFP application.
>
>Some straws I'm grasping at: You don't happen to have some object reference hanging around to a Bookmark or a Range, do you? Or, did you try to Save, then make Word invisible, thereby hiding the dialog? Is there a macro in the template that's firing on the save or quit events?
>
>You've really got me curious <s>. What's the error message say?
>
> - della
>
>>>I just tried this code, and I'm not seeing the same thing you're seeing. I don't get an OLE error on the second proc. It may be related to the "do some stuff" code. What, specifically, is the OLE error message?
>>>
>>> - della
>>>
>>>>I have noticed that when I use the Word spell checker I need to shut it down differently than when I create a document in Word. To make sure I get rid of the winword in the task manager I do the following.
>>>

>* Spell checking
>>>>oWord = CreateObject("Word.Application")
>>>>IF oWord.CheckSpelling(oedtQuote.Value) = .F.
>>>>  WITH oWord
>>>>    .Documents.add
>>>>    .Selection.TypeText(oedtNotes.Value)
>>>>    .Visible = .T.
>>>>    .WindowState = 0
>>>>    .Options.CheckGrammarWithSpelling = nchkGrammar
>>>>    .Options.IgnoreUpperCase = nchkIgnoreCase
>>>>    .Options.IgnoreMixedDigits = nchkIgnoreNumber
>>>>    .Options.IgnoreInternetAndFileAddresses = nchkIgnoreInternet
>>>>    .CustomDictionaries.ActiveCustomDictionary = ;
>>>>      .CustomDictionaries(ThisForm.PageFrame1.Page5.lstDictionaries.ListItemID)
>>>>    IF nchkGrammar
>>>>      .Activedocument.CheckGrammar
>>>>    ELSE
>>>>      .Activedocument.CheckSpelling
>>>>    ENDIF
>>>>    .Selection.WholeStory
>>>>    oedtNotes.Value = .Selection.Text
>>>>    .ActiveDocument.Close(0)
>>>>    .Visible = .F.
>>>>  ENDWITH
>>>>ENDIF
>>>>oWord.Quit()
>>>>oWord = .NULL.
>>>>RELEASE oWord
>>>>* create a document on a word template
>>>>oWord = CreateObject("Word.Application")
>>>>oDoc = .Documents.Open(lcTemplate)
>>>>... Do some stuff
>>>>oWord.Visible = .T.
>>>>oWord.WindowState = 0
>>>>oDoc = .NULL.
>>>>RELEASE oDoc
>>>>oWord = .NULL.
>>>>RELEASE oWord

>>>>
>>>>If I do a oWord.Quit() in the second example I get an ole error. No biggie just thought I'd pass this along...