[AccessD] Word Not Closing

Quite So!  You could also try objword.quit.  But do it quietly, ok?

Max

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte Foust
Sent: 25 February 2009 20:56
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Word Not Closing

I'm working off memory, so don't rely on it.  Try objWord.Quite.

Charlotte Foust

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin
at Beach Access Software
Sent: Wednesday, February 25, 2009 11:39 AM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Word Not Closing

Charlotte:

objWord.close generates error Object does not support this property or
method.  Is it because of late binding? 


Rocky Smolin
Beach Access Software
858-259-4334
www.e-z-mrp.com
www.bchacc.com
 
 

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Charlotte
Foust
Sent: Wednesday, February 25, 2009 11:06 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Word Not Closing

You aren't closing the word.application, you're just setting the
variable to nothing once you close the document.  Isn't there an
objWord.Close missing?

Charlotte Foust

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin
at Beach Access Software
Sent: Wednesday, February 25, 2009 11:02 AM
To: 'Access Developers discussion and problem solving'
Subject: [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/> 

 

 

 

--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com