Hook Windows IE address bar

[PepsiHog]

v12

Does anyone have a srt that will hook and retrieve the address bar content of Windows Internet Explorer?

I realize you can automate this and press some FKey and copy it. But in this case that doesn't fit the bill.

If someone has this, I sure would appreciate the help.

Thanls.

[olllllliii]

Let>i=1
Label>forward
RegistryReadKey>HKEY_CURRENT_USER,Software\Microsoft\Internet Explorer\TypedURLs,url%i%,urlOUT
IF>urlOUT=
ReadFile>C:\url.txt,info
MessageModal>%info%
EXIT
ELSE
Add>i,1
Let>WLN_NOCRLF=0
WriteLn>C:\url.txt,nWLNRes,urlOUT
Goto>forward
ENDIF

[PepsiHog]

Thanks Oliver.

But I don't need typed URL's. I need what ever is in the address bar.

[Marcus Tettmar]

This should work across all versions of Windows:

Code: Select all

Press ALT
Send>d
Release ALT
Press CTRL
Send>c
Release CTRL
GetClipBoard>address
MessageModal>address

Obviously requires that Windows Explorer has the focus first.

Not sure if there's a way to do it without sending keystrokes. Actually I can see that there is in Win7 since the address text is exposed and prefixed with "Address ". So we could walk the objects and get the text, or just use GetWindowText and RegEx, something like:

Code: Select all

//assuming Windows Explorer is current window, get it's handle 
Let>WIN_USEHANDLE=1
GetActiveWindow>wHandle,x,y

//get all the window text
GetWindowText>wHandle,allText

//address bar text begins "Address: "
StringReplace>allText,CRLF,||,allText
RegEx>(?<=Address: ).+?(?=\||),allText,0,matches,nm,0
MessageModal>matches_1

But that won't work in XP since the text is not exposed.

I did wonder if there's a way to use DDE like there is with Internet Explorer but I can't find anything about that.

[PepsiHog]

v12

Yeah, I don't think I'm going to get what I want this time. I've been searching for a VBS example online (til my eye's exploded),
but no such luck.

Marcus, I've seen this request from others. Do you think a hook command may lie in the future? Maybe....near future?

If someone comes across, or has a vbs script for this purpose, please post
it here. I will keep the "Notify me" option on. Post it for me and all the
others that may be interested. Please.