Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Oleboundcontrol Not Releasing WINWORD.EXE process
Message
From
25/09/2002 10:46:48
 
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00704007
Message ID:
00704246
Views:
21
>>Has anyone figured out how to close the WINWORD.EXE process that an oldboundcontrol object starts when it is assigned a control source?
>>
>>Here is the code I'm using:
>>
>> oform = CREATEOBJECT('form')
>> oform.ADDOBJECT('owordobject','oleboundcontrol')
>> oform.owordobject.CONTROLSOURCE = 'c_parent.contract'
>> oform.owordobject.SAVEAS(lcdir+lcfilename)
>> oform.owordobject.CONTROLSOURCE = ''
>> oform.REMOVEOBJECT('owordobject')
>> oform = ''
>> RELEASE oform
>>
>>REMOVOBJECT() and RELEASE oform do not remove the WINWORD.EXE process from the task manager. I thought maybe setting the CONTROLSOURCE to blank would do it but that didn't work either.
>>
>>HELP!!!!
>>
>>Trish
>
>Trish,
>
>
>WITH oForm.oWordObject
>.ActiveDocument.Close(0)
>.oWordObject.Quit()
>.oWordObject = .NULL.
>ENDWITH
>
>José


Every line produced an error.

This is how I finally got it to work.

oform = CREATEOBJECT('form')
oform.ADDOBJECT('owordobject','oleboundcontrol')
oform.owordobject.CONTROLSOURCE = 'c_parent.contract'
oform.owordobject.doverb(0)
oform.owordobject.SAVEAS(lcdir+lcfilename)
oform.REMOVEOBJECT('owordobject')
oform.destroy && not necessary
oform.release && not necessary
oform = ''
RELEASE oform

You MUST have the DOVERB(0) AFTER assigning the CONTROLSOURCE. If you don't, it won't release WINDWORD.EXE.

THIS IS NOT A PROBLEM UNDER Windows XP. My original source worked fine on XP. It seems to be a WINDOWS 2000 issue. It was happening on SP2 and SP3.

Thanks.
Trish
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform