General information
Category:
COM/DCOM and OLE Automation
>>Hi Cetin
>>
>>I changed my code, to something like you have above, but the process is still hanging in Windows, here is a portion of the code
>>
>>** Open Excel Object
>>oEx=CREATEOBJECT("Excel.Application")
>>lcSH=ALLTRIM(ThisForm.txtSpreadsheetFile.Value)
>>oEx.workbooks.open("&lcSH")
>>
>>** Confirm Legitimate Master Spreadsheet
>>nA1=oEx.ActiveWorkBook.ActiveSheet.Range("A1").value
>>IF nA1=1.1
>>else
>> lcM="Not a Valid Master Spreadsheet"
>> lcH="Error"
>> MESSAGEBOX(lcM,16,lcH)
>> oEx.quit
>> RELEASE oEX
>>ENDIF
>>
>>I am ensuring A1<>1.1 and receiving the Not Valid message, but the process still hangs. Can you see anything I have wrong in this code?
>>
>>Regards
>>Darren
>
>Darren,
>I don't see something wrong (except I don't like .open("&lcSH") - why not .open(m.lcSH)).
>I tried it and it releases (tried under XP,VFP7,Excel2002 - but as I remember Excel2000 would release too).
>Cetin
Thanks Cetin
I have noticed that this is not happening on a machine with nearly identical specs as the machine I am using, so maybe it's my machine and the way it is configured. I will do some more investigating, and see if it happens on a couple of other boxes I have with similar specs.
You are correct, open.(m.lcSH) is a lot cleaner.
Thanks Again
Darren
Previous
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only