Code: Select all
#Include IEGet.ahk
web := IEGetURL()
wr := web.readyState
wdr := web.document.readyState
wb := web.busy
MsgBox, 0, Debugging, Web Ready - %wr%`nWeb Document Ready - %wdr%`nWeb Busy - %wb%
IEGet(Name="") ; Retrieve pointer to existing IE window/tab
{
IfEqual, Name,, WinGetTitle, Name, ahk_class IEFrame
Name := ( Name="New Tab - Windows Internet Explorer" ) ? "about:Tabs"
: RegExReplace( Name, " - (Windows|Microsoft) Internet Explorer" )
For wb in ComObjCreate( "Shell.Application" ).Windows
{
wbLocName := wb.LocationName
wbFullName := wb.FullName
If ( wb.LocationName = Name ) && InStr( wb.FullName, "iexplore.exe" )
{
Return wb
} ; If
} ; For wb
} ;written by Jethrow
Thanks in advance.