IE....

[magician13134]

Sorry, but it's been a long time since I've worked with COM objects... Is it possible to communicate with an open IE window via autoit, or can I only create one?

If I use $oIE=ObjCreate("InternetExplorer.Application.1"), it creates a new IE window, I'm not sure how to go about talking to an open one...

Thanks

[DaleHohm]

_IEAttach -- see the IE Management UDF

[kjactive]

Hallo Magician13134

Windows come with two semilare IE activex componets buildin the system, the Webbrowser ( shell.explorer ) and Internetexplorer ( Explorer.exe ) - one opens a new window and the other ( webbrowser ) is ment to be embedded - do not attach the revision number last if you want your application to keep updated and talking to an open IE you do with Events that fires up when something happens in the window like in the example...

Personal I like another freeware IE browser ( library ) CWebpage.dll that automate most tasks - one of a kind library that do all from only five or six commands, read more about CWebpage.dll

http://www.codeproject.com/com/cwebpage.asp#DLL

; =======================================================================
; Small InternetExplorer.Application example by Kåre Johansson
; Requerement InternetExplorer.Application component - Explorer.exe
; =======================================================================

$ObjIE = ObjCreate("InternetExplorer.Application")
If Not IsObj($ObjIE) Then
    ConsoleWrite('InternetExplorer object failure...' & @CRLF)
    Exit
EndIf
$ObjIEEvt = ObjEvent($ObjIE,"InternetExplorerEvent_"); init the event handle process

With $ObjIE; object pool
   .Visible = True
   .Navigate('http://msdn2.microsoft.com/en-us/library/aa752043.aspx')

   While .ReadyState <> 4
      Sleep(50)
   WEnd
EndWith

$ObjIE = 0; remember to free object
Exit

; Event that fires up when navigation is compleated
Func InternetExplorerEvent_NavigateComplete($pDisp, $URL)
    ConsoleWrite('Navigation Compleate: ' & $pDisp & ' ' & $URL & @CRLF)
    While $ObjIE.ReadyState <> 4
      Sleep(50)
  WEnd
  Sleep(2500)
  $ObjIE.Quit
EndFunc

Read more about Windows default browsers

http://msdn2.microsoft.com/en-us/library/aa752043.aspx

kjactive

Edited November 21, 2007 by kjactive