Jump to content

Recommended Posts

I made this:

$nutteloos = 1
Do
    Opt( "WinTitleMatchMode", 2 )
    #include <IE.au3>
    $oIE = _IECreate ("http://www.google.com/")
    #include <IE.au3> 
    $site = _IEPropertyGet ( $oIE, "locationurl" )
    If $site = ( "http://www.google.com/" ) Then
        TrayTip( "WebWarner 1.0 door Ruben van Os", "Dit is een goedgekeurde site", 30 )
    EndIf
Until $nutteloos = 0

But it doesn't work.

Please help my

Edited by Somebody Someware

Go to This site for my best product!

Link to post
Share on other sites

Opt( "WinTitleMatchMode", 2 )
#include <IE.au3>

HotKeySet("{ESC}", "_Terminate")

$oIE = _IECreate ("http://www.google.com/")
$site = _IEPropertyGet ( $oIE, "locationurl" )

$nutteloos = 1
Do
    If $site = ( "http://www.google.com/" ) Then TrayTip( "WebWarner 1.0 door Ruben van Os", "Dit is een goedgekeurde site", 30 )
    Sleep ( 10 )  
Until $nutteloos = 0

Func _Terminate()
    Exit
EndFunc

SciTE for AutoItDirections for Submitting Standard UDFs

 

Don't argue with an idiot; people watching may not be able to tell the difference.

 

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...