Check If Object exist in IE for any website.

[naru]

How to use 

$body = _IEBodyReadHTML($oIE)

If StringInStr($body, "succusbox") Then
    MsgBox(0, "Success", "The string was found")
EndIf

for any website that's already opened in Internet explorer?

edit : How Check If Object exist in IE without calling website ?

Edited March 15, 2018 by Nareshm

[BrewManNH]

Post all of your code that you have tried. Where is $oIE set?

[JLogan3o13]

@Nareshm look at _IEAttach to attach to an open instance. This time around, actually read the article in the help file and try it.

And before we go too much farther - realize that if this devolves into yet another CAPTCHA thread you will be gone.

Edited March 15, 2018 by JLogan3o13

[naru]

15 minutes ago, BrewManNH said:

Post all of your code that you have tried. Where is $oIE set?

$oIE = any webiste that is already opened in ie

Edited March 15, 2018 by Nareshm

[BrewManNH]

How do  you set the value in it?

[naru]

9 hours ago, BrewManNH said:

How do  you set the value in it?

I do not know, if I knew this question why I asked this question here, I want to find StringInStr in any website, what do I enter $oIE = ?

[Juvigy]

You will have to put _IEAttach in a loop and loop all opened IE tabs/windows and check.

This code does it for only one tab/window:

$body = _IEBodyReadHTML($oIE)

If StringInStr($body, "succusbox") Then
    MsgBox(0, "Success", "The string was found")
EndIf

[BrewManNH]

7 hours ago, Nareshm said:

what do I enter $oIE = ?

https://www.autoitscript.com/autoit3/docs/libfunctions/_IEAttach.htm

https://www.autoitscript.com/autoit3/docs/libfunctions/_IECreate.htm

These would be a start.

[JLogan3o13]

7 hours ago, Nareshm said:

I do not know, if I knew this question why I asked this question here,

This kind of attitude, along with your unwillingness to try suggestions given to you, is not going to get your questions answered. How about showing a dash a maturity and realizing that you may not be providing a good amount of information for people to help.

Edited March 16, 2018 by JLogan3o13

[Jos]

@Nareshm,

It seems the short vacation on the naughty spot hasn't worked very well so I will make it ultimately clear to you:

Next offense will mean you strike out indefinitely.

Jos

[mLipok]

@Nareshm try this:
 

expandcollapse popup

Func _IERegExpFind($sRegExpPattern, $sMode = 'name', $bVisiblity = Default)
    Local $oIE_COM_ErrorHandler = ObjEvent("AutoIt.Error", __YOURS_COM_ERRROR_HANDLER_FUNCTION)
    #forceref $oIE_COM_ErrorHandler ; COM Error Handler is in Local Scope - so automatic cleanup at end of function

    Local Enum $ARR_OJBECT, $ARR_NAME, $ARR_URL, $ARR_VISIBLE, $ARR_COUNTER

    Local $iMode = -1
    If $sMode = 'name' Then
        $iMode = $ARR_NAME
    ElseIf $sMode = 'url' Then
        $iMode = $ARR_URL
    ElseIf $sMode = 'all' Then
        $iMode = -1
    Else
        Return SetError(1, 2, -1)
    EndIf

    Local $oShell = ObjCreate("shell.application")
    Local $oShellWindows = $oShell.windows
    If $oShellWindows = Null Then Return SetError(2, 0, -1)

    Local $iCount = $oShellWindows.Count
    Local $aIEObjects[$iCount][$ARR_COUNTER]
    Local $oIE, $iIEWindow_idx = -1
    For $iWindow_idx = 0 To $iCount - 1
        $oIE = $oShellWindows.Item($iWindow_idx)
        If @error Or $oIE = Null Or (Not IsObj($oIE)) Then ContinueLoop

        $iIEWindow_idx += 1
        $aIEObjects[$iIEWindow_idx][$ARR_OJBECT] = $oIE
        $aIEObjects[$iIEWindow_idx][$ARR_NAME] = $oIE.LocationName
        $aIEObjects[$iIEWindow_idx][$ARR_URL] = $oIE.LocationURL
        $aIEObjects[$iIEWindow_idx][$ARR_VISIBLE] = $oIE.Visible

        If $sRegExpPattern <> Default And $sMode <> Default Then
            If $sMode = 'all' Then 
                ContinueLoop
            ElseIf StringRegExp($aIEObjects[$iIEWindow_idx][$iMode], $sRegExpPattern, $STR_REGEXPMATCH) = 0 Then
                ; here is remove if not exist
                $iIEWindow_idx -= 1
                ContinueLoop
            ElseIf $bVisiblity <> Default Then
                ; check if you want to check $bVisiblity state
                If $bVisiblity <> $aIEObjects[$iIEWindow_idx][$ARR_VISIBLE] Then
                    $iIEWindow_idx -= 1 
                EndIf
                ContinueLoop
            EndIf
        EndIf
    Next

    ; Clean Up
    $oShellWindows = Null
    $oShell = Null

    If $iIEWindow_idx = -1 Then Return SetError(3, 0, -1)

    $iCount = $iIEWindow_idx + 1
    ReDim $aIEObjects[$iCount][$ARR_COUNTER]

    Return SetExtended($iCount, $aIEObjects)
EndFunc   ;==>_IERegExpFind

 

HOWTO:
 

_Example()

Func _Example()
    Local Enum $ARR_OJBECT, $ARR_NAME, $ARR_URL, $ARR_VISIBLE, $ARR_COUNTER
    Local $aResult = _IERegExpFind('', 'all')
    If Not @error Then
        _ArrayDisplay($aResult,'$aResult')
        Local $oIE = Null
        For $iObject_idx = 0 To UBound($aResult) -1
            $oIE = $aResult[$iObject_idx][$ARR_OJBECT]
            ConsoleWrite("! " & $aResult[$iObject_idx][$ARR_NAME] & @CRLF)
            ConsoleWrite("! " & $aResult[$iObject_idx][$ARR_URL] & @CRLF)
        Next
    Endif
EndFunc

Remark: NOT TESTED BETA STAGE

 

[naru]

20 hours ago, Juvigy said:

You will have to put _IEAttach in a loop and loop all opened IE tabs/windows and check.

This code does it for only one tab/window:

$body = _IEBodyReadHTML($oIE)

If StringInStr($body, "succusbox") Then
    MsgBox(0, "Success", "The string was found")
EndIf

@Juvigy 

How to put _IEAttach in a loop and loop all opened IE tabs/windows and check? 

please give me exmaple.

[Bilgus]

See Example 5 in the help file

https://www.autoitscript.com/autoit3/docs/libfunctions/_IEAttach.htm

[naru]

4 hours ago, Bilgus said:

See Example 5 in the help file

https://www.autoitscript.com/autoit3/docs/libfunctions/_IEAttach.htm

Thanks My Problem is solved

[JLogan3o13]

So once again it comes down to your not reading through the help file. Something of a pattern developing.