Use NEWOBJECT to attempt to create an instance of Excel. If you get an object
then Excel is installed. Wrap the whole thing in a TRY...CATCH.
Untested pseudo-code to get you started
LOCAL m.loExcel AS Excel.Application
TRY
m.loExcel=NEWOBJECT([Excel.Application])
CATCH TO m.loError
* do something here if you want depending on the error
FINALLY
IF VARTYPE(m.loExcel)<>[O]
MESSAGEBOX([No Excel here!])
ELSE
MESSAGEBOX([We have Excel here!])
m.loExcel.Visible=.t.
ENDIF
ENDTRY
--
rk
-----Original Message-----
From: ProfoxTech [mailto:[email protected]] On Behalf Of Sytze de
Boer
Sent: Wednesday, October 01, 2014 3:48 PM
To: [email protected]
Subject: Is Excel installed?
What is the quick way to determine of Excel is installed?
In my system, as an example, clients can turn a number of reports into an Excel
pivot report.
Of course, a number of them phone me to say there's a bug in the system because
my system comes up with an OLE error. Excel is not installed
--
Kind regards,
Sytze de Boer
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/DF1EEF11E586A64FB54A97F22A8BD04423C5CC96F7@ACKBWDDQH1.artfact.local
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
