;Have a tab active
;have the Well reports folder open
;add Well reports to default firefox download location
dim $x
dim $openinpdf
dim $i
$x=InputBox(”DE”,”Enter Number of DL’s”,10)
WinClose(”https://data.crownminerals.govt.nz - Access Document - Mozilla Firefox”)
;
;$x = InputBox ( “DE File Downloader”, “Enter Number of Documents on Page” , “10″ )
;$openinpdf = 0
;put crown minerals into foreground
WinWait( “Crown Minerals Technical Data” )
WinActivate ( “Crown Minerals Technical Data” )
WinSetState(”Crown Minerals Technical Data”, “”, @SW_MAXIMIZE)
Sleep(1000)
MouseClick ( “left” , 1270,300, 2) ;click scroller
MouseClick ( “left” , 260, 390 , 1)    ;’click in middle of page
;’send 11 tabs
;’send enter
Send(”{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}{TAB}”)
Sleep(3000)
;002
for $i = 1 …

script to change location
– Global property
global set_loc
– Gets current Location
set current_location to do shell script “scselect 2>&1 | grep ‘^ ‘ 2>&1 | grep ‘*’ | cut -f 2 -d ‘(’ | cut -f 1 -d ‘)’”
– checks if it is set to first location and changes to the other one if it is
if current_location is equal to “LOCATION A” then
do shell script “scselect LOCATION B”
set set_loc to “LOCATION B”
– if not then checks to see if it is set to the second location and changes to the other one …