Greetings,
This should do the trick:
Sub MinimizeApp()
Dim CGW As New CGetWindow ' Boston WorkStation library that does all
sorts of things with windows..
CGW.ShowWindow showMINIMIZE, GetForeGroundhWnd 'This will minimize
the foreground window
End Sub
Regards,
Thom
Thom C. Blackwell
Product Manager
Boston Software Systems
(866) 653-5105 ex 807
www.bossoft.com <http://www.bossoft.com/>
Visit us at MUSE Internationl Booth 629
Sign up for my weekly webinar!
<http://www.bostonworkstation.com/customer_center/special_events.aspx>
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]]
Sent: Friday, April 24, 2009 9:21 AM
To: Talk
Subject: [talkbws] RE: meditech magic focus question
ok so the Activate statement worked but it brought the screen to the
foreground. is there a minimize command I can also use/?
Ambur Tiller
Adena Health System
Programmer Analyst
Information Technology
272 Hospital Road, Chillicothe, OH 45601
Tel: (740)-779-7854
Email: [email protected]
From: [email protected] [mailto:[email protected]]
Sent: Thursday, April 23, 2009 11:41 AM
To: [email protected]
Subject: [talkbws] RE: meditech magic focus question
well, I thought I would have trouble with that box popping up to select
the file because it looks like a standard Microsoft Windows box for
selecting a file and clicking open. But this line worked:
Condition: Title APPG at 1,1
Cursor at 5,18
Actions: Key F("FILEPATH")
Key F("FILENAME")
Enter ""
Then I tell it to go to step remove date. In step remove date
Condition: Title APPG at 1.1
Cursor at 7,26
Actions: Key "{F10}" ' IT WILL NOT KEY THE F10 PART UNLESS I CLICK ON
THE TASKBAR WHERE MEDITECH IS MINIMIZED TO VIEW THE SCREEN
The script runs minimized with this connect command in the beginning :
Connect "835MeditechPostings C:\Program
Files\MEDITECH\Workstation3.x\T.exe", stMeditechNUIEx: Dim cgw As New
CGetWindow: Activate "Magic", True: h = GetForeGroundhWnd:
cgw.ShowWindow showMINIMIZE, h
Ambur Tiller
Adena Health System
Programmer Analyst
Information Technology
272 Hospital Road, Chillicothe, OH 45601
Tel: (740)-779-7854
Email: [email protected]
From: [email protected] [mailto:[email protected]]
Sent: Thursday, April 23, 2009 11:26 AM
To: [email protected]
Subject: [talkbws] RE: meditech magic focus question
Greetings,
Hum... that doesn't sound right - meaning Meditech being in the
foreground or not shouldn't matter. Meaning cursor detection, text on
screen etc. is not impacted by whether or not Meditech is in the
foreground.
An Activate command may help to force the issue...
Activate "Current Meditech Caption goes here",True
But...
What are you using to fill in the Save As dialog box?
With the current shipping of BWS there is a new command called
SmartDialog that works really well for these situations.
Check out:
http://www.bostonworkstation.com/customer_center/script_center/script_de
tails.aspx?id=372&cat=10
For an example that will match your situation.
Regards,
Thom
Thom C. Blackwell
Product Manager
Boston Software Systems
(866) 653-5105 ex 807
www.bossoft.com <http://www.bossoft.com/>
Visit us at MUSE Internationl Booth 629
Sign up for my weekly webinar!
<http://www.bostonworkstation.com/customer_center/special_events.aspx>
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]]
Sent: Thursday, April 23, 2009 11:19 AM
To: Talk
Subject: [talkbws] meditech magic focus question
So I have a script that enters a filename into Meditech. When it gets to
the field to pull in the filename it opens a windows browse box. The
script puts in the filename and hits Enter. After that though, unless I
bring the meditech window back to maximized in the taskbar, it is as
though the script has lost focus with the Meditech session. Hope this
makes sense. Is there a command to bring focus back?
Thanks,
Ambur Tiller
Adena Health System
Programmer Analyst
Information Technology
272 Hospital Road, Chillicothe, OH 45601
Tel: (740)-779-7854
Email: [email protected]
******************************************************************
This email and any files transmitted with it are proprietary and
confidential
and intended solely for the use of the individual or entity to whom they
are
addressed. If you have received this email in error please notify the
system
manager at [email protected]. Please note that any views or opinions
presented
in this email are solely those of the author and do not necessarily
represent
those of the company. No employee or agent is authorized to conclude any
binding
agreement on behalf of Adena Health System with another party by email
without
express written confirmation from Adena Health System authorized
individuals.
Finally, the recipient should check this email and any attachments for
the presence of viruses.
The company accepts no liability for any damage caused by any virus
transmitted by this email.
Adena Health System, 272 Hospital Road, Chillicothe, Ohio, USA,
http://www.adena.org
******************************************************************
---
To post a message to this list, send mail to: [email protected]
You are currently subscribed as: [email protected]
Unsubscribe in the customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk
.aspx
---
To post a message to this list, send mail to: [email protected]
You are currently subscribed as: [email protected]
Unsubscribe in the customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk
.aspx
---
To post a message to this list, send mail to: [email protected]
You are currently subscribed as: [email protected]
Unsubscribe in the customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk
.aspx
---
To post a message to this list, send mail to: [email protected]
You are currently subscribed as: [email protected]
Unsubscribe in the customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk
.aspx
---
To post a message to this list, send mail to: [email protected]
You are currently subscribed as: [email protected]
Unsubscribe in the customer center on our website:
http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx
