[AccessD] Word Not Closing

Dear List:

 

I am using the following to get the contents of a word doc.  Works all OK
except that Word is not closing.  Document is closed but not word.  What am
I doing wrong?

 

' Get word document
Dim objWord As Object
Set objWord = CreateObject("Word.Application")
objWord.Documents.Open (varFileName)
objWord.Visible = False
objWord.Selection.Wholestory
objWord.Selection.Copy
strBody = objWord.Selection
objWord.Documents.Close
Set objWord = Nothing


 

MTIA,

 

Rocky Smolin

Beach Access Software

858-259-4334

www.e-z-mrp.com <http://www.e-z-mrp.com/> 

www.bchacc.com <http://www.bchacc.com/>