Script hangs with popup using _IELinkClickByIndex()

[xah]

The script freezes when using _IELinkClickByIndex() wich opens a popup Windows.

#include-once
#include <IE.au3>
#include <Excel.au3>
#include <_toolFunctions.au3>
objectMaken()

    $oFormContent = _IEFormGetObjByName($oFrameContent, 0)
    $productID = _ExcelReadCell ($oExcel, $Ri, 7)

    $linkIndex = kiesProduct($productID)
    _IELinkClickByIndex ($oFrameContent, $linkIndex, 0);Opens a popup and does not continue
    
    MsgBox (64, "Info", "Hallo!")
    
Func kiesProduct($productID)
    $prodLink = "https://www.epacity.nl/site/ProcessRegradeServlet?epacityProductId=" & $productID
    $oLinks = _IELinkGetCollection ($oFrameContent)
    $iNumLinks = @extended
    For $i = 0 to ($iNumLinks -1)
        $oLink = _IELinkGetCollection ($oFrameContent, $i)
        If $oLink.href = $prodLink Then
    ;_IELinkClickByIndex ($oFrameContent, $i, 0)
            Return $i
        EndIf
    Next
Return False
EndFunc

Please help?

Edited January 8, 2009 by xah

[PsaltyDS]

The script freezes when using _IELinkClickByIndex() wich opens a popup Windows.

Please help?

Are you saying the link clicked does produce a popup window, but the MsgBox() doesn't come up? Since you have $f_wait = 0, that should not be blocking.

[James]

Perhaps the script is loading.

[xah]

Are you saying the link clicked does produce a popup window, but the MsgBox() doesn't come up? Since you have $f_wait = 0, that should not be blocking.

Exaclty! Why does it not continue ? Any ideas ?

[PsaltyDS]

Exaclty! Why does it not continue ? Any ideas ?

Try giving focus to the object and then ControlClick() on it:

$hIE = _IEPropertyGet($oIE, "hwnd")
$oLink = _IELinkGetCollection($oFrameContent, $linkIndex)
_IEAction($oLink, "focus")
ControlClick($hIE, "", "")

[xah]

Try giving focus to the object and then ControlClick() on it:

$hIE = _IEPropertyGet($oIE, "hwnd")
$oLink = _IELinkGetCollection($oFrameContent, $linkIndex)
_IEAction($oLink, "focus")
ControlClick($hIE, "", "")

Thanks, it works now by giving focus to the object and then ControlSend(). Edited January 9, 2009 by xah