Script hangs up on while loop

[Aequitas]

Thank you JohnOne. I used your idea of enumerating the links and used that to exitloop

Func _FixOfficeID()
    $pop = 12
    Local $oLinks = _IELinkGetCollection($oIE)
    Local $iNumLinks = @extended - 13
    While 3
        $iNumLinks = $iNumLinks - 1
        $pop += 1
        _IELinkClickByIndex($oIE, $pop)
        If $iNumLinks = 1 Then
            ExitLoop
        EndIf
        Sleep(500)
        _IEAction($oIE, "back")
        Sleep(200)
    WEnd
EndFunc   ;==>_FixOfficeID