No response in ControlClick

[cwem]

With help from oMBRa and Dale, I'm able to complete the follow codes. I have got 2 unresolved puzzles.

1. for the:

For $i = 0 To 1

_IEFormElementCheckboxSelect ($oForm, $i, "", 1, "byIndex")

Next

I just don't know why nothing is checked. In fact if I increase from 1 to 3 or above, then something are checked accordingly, that means some unknown offsets are there.

Ok, maybe i can just ignore the above problem, but why the last few codes of file download really puzzles me. FreeTry once said UDF may solve but after days of study, I still don't quite get why UDF can solve this problem. Can anybody tell me some hints about how to download the results automatically? thanks in advance!

============================

#include <IE.au3>

#include <Array.au3>

#include <File.au3>

$dir = "C:\";

$murl = "http://www.hiv.lanl.gov/components/sequence/HIV/search/search.html"

$element = "U"

$sFile = $dir & "\Subtype_" & $element & ".xls"

If FileExists($sFile) Then FileDelete($sFile)

$hFile = FileOpen($sFile, 1) ; 1 = append

$i = 0

$oIE = _IECreate ()

_IELoadWait ($oIE)

_IENavigate ($oIE, $murl)

$oForm = _IEFormGetCollection($oIE, 1)

$oSelect = _IEFormElementGetObjByName ($oForm, "value SEQ_SAMple SSAM_subtype 1 exact")

_IEFormElementOptionselect ($oSelect, "Any subtype", 0, "byText")

_IEFormElementOptionselect ($oSelect, $element, 1, "byText")

$targetTextObj = _IEFormElementGetObjByName ($oForm, "max")

_IEFormElementSetValue ($targetTextObj, 2)

$oSubmit = _IEFormElementGetObjByName ($oForm, "submit")

_IEAction ($oSubmit, "click")

_IELoadWait ($oIE)

Do

$success = WinActivate("Search Result - Windows Internet Explorer")

;Or IE.au3 V2.4-0 Warning from function _IEFormGetCollection, $_IEStatus_NoMatch --> will return, unknown reason

until $success = 1

$oIE = _IEAttach ("Search Result")

$oForm = _IEFormGetCollection($oIE, 1)

$oButton = _IEFormElementGetCollection($oForm, 2)

_IEAction($oButton, "click")

For $i = 0 To 1

_IEFormElementCheckboxSelect ($oForm, $i, "", 1, "byIndex")

Next

$oSubmit = _IEFormElementGetObjByName ($oForm, "save_tbl")

_IEAction ($oSubmit, "click")

_IELoadWait ($oIE)

WinWaitActive("File Download")

WinActivate("File Download")

ControlClick("File Download", "Do you want to open or save", "&Save")

WinWaitClose("File Download")

;ControlSetText("Save As", "Save &in", "Edit1", $dir)

WinActivate("Save As")

ControlClick("Save As", "Save &in", "&Save")

WinWaitClose("Save As")

;MsgBox(0,@error,@error)

exit

==================================================================

[cwem]

============================

WinWaitActive("File Download")

WinActivate("File Download")

ControlClick("File Download", "Do you want to open or save", "&Save")

WinWaitClose("File Download")

;ControlSetText("Save As", "Save &in", "Edit1", $dir)

WinActivate("Save As")

ControlClick("Save As", "Save &in", "&Save")

WinWaitClose("Save As")

==================================================================

after studying AutoIt v3 Window Info, I have tried modifying the ControlClick part to:

;ControlClick("File Download", "", "[CLASS:Button; TEXT:&Save; INSTANCE:2]")

ControlClick("File", "", 4427)

, but the problem persists as so...

[bogQ]

after studying AutoIt v3 Window Info, I have tried modifying the ControlClick part to:

;ControlClick("File Download", "", "[CLASS:Button; TEXT:&Save; INSTANCE:2]")

ControlClick("File", "", 4427)

, but the problem persists as so...

the problem is that your waiting to first win get close (note that he isnt getting closed so you have two windows and you dont need WinWaitClose("File Download") becose that win isnt gooing to close before you start download)

Opt("TrayIconDebug", 1)
WinWait("File Download")
WinActivate("File Download")
WinWaitActive("File Download")
ControlClick("File Download", "", "Button2")
;ControlSetText("Save As", "Save &in", "Edit1", $dir)
WinWait("Save As")
WinActivate("Save As")
WinWaitActive("Save As")

ControlClick("Save As", "", "Button2")
WinWaitClose("Save As")

Edited July 2, 2009 by bogQ