Greetings, Here goes:
Call CheckExcel it will set a flag f(ExcelRunning) true /false which
can be evaluated in a script- or you could modify the routine below to suit
your tastes.
Regards,
Thom
Sub checkExcel()
F("ExcelRunning") = False
Dim lw As New CListWindows
For Each h In lw.HasCaptionLike("*Excel*")
F("ExcelRunning") = True
Exit Sub
Next h
'if I get here - Excel is not running
F("ExcelRunning") = False
End Sub
Thom C. Blackwell
Product Manager
Boston Software Systems
(866) 653-5105 ex 807
www.bossoft.com <http://www.bossoft.com/>
Sign <http://www.bostonworkstation.com/customer_center/special_events.aspx>
up for my weekly webinar!
LEGAL NOTICE Unless expressly stated otherwise, this message is confidential
and may be privileged. It is intended for the addressee(s) only. Access to
this E-mail by anyone else is unauthorized. If you are not an addressee, any
disclosure or copying of the contents of this E-mail or any action taken (or
not taken) in reliance on it is unauthorized and may be unlawful. If you are
not an addressee, please inform the sender immediately, then delete this
message and empty from your trash.
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Lawrence, Mitchell
Sent: Tuesday, March 25, 2008 11:27 AM
To: [email protected]
Subject: [Talk] Method to see if an application is running
Good morning all. Happy spring!
Does anyone have a method to check running processes to see if a particular
application is running?
Ive got several scheduled scripts that utilize the same spreadsheet for
input data. I would like to, when the script starts, check to see if
excel.exe is already in the list of running processes and then take action
dependent upon the results of that query. Action 1 if excel is already
running, action 2 if it is not.
Thank you,
Mitch Lawrence
Lead Applications Analyst
Technical Support - NPR/Automation
CHRISTUS Information Management
: <mailto:[EMAIL PROTECTED]>
[EMAIL PROTECTED]
Send a " <http://intranet.christushealth.org/spiritBuck/Default.asp> thank
you" to someone!
<<image001.png>>
