Sign in to follow this  
Followers 0
willwatters

AdlibEnable() function

2 posts in this topic

#1 ·  Posted (edited)

For the AdlibEnable() function I have used the following at the start of my script:

;/* check for unforeseen errors every 250 MS (i.e. checks for an error window to pop up unpredictably, etc)

AdlibEnable("myadlib")

Func myadlib()

If WinActive("Error") Then

MsgBox(48, "Error Found", "Unexpected error occurred")

Exit

WinClose("BAJI/CACI Jury Instruction Selector for Windows")

WinClose("Jury Instruction Selector")

WinClose("New Instruction Set")

WinClose("BAJI/CACI Jury Instruction Selector for Windows [instructions Not Saved]")

EndIf

EndFunc

Will this work (check for unforeseen errors every 250 MS (i.e. checks for an error window to pop up unpredictably, etc)) and is there any other code I need to enter here please?

Is there also a way of capturing the type of error in order to display it in the MsgBox?

Edited by willwatters

Share this post


Link to post
Share on other sites

Well, firstly you need to remove that Exit line, else the WinClose lines will not execute cos you've exited the script.

In terms of capturing the error, without knowing what the window looks like I wouldn't know, but there may be some text on the window you can grab.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0