How do i close a website ?

[thaihoang2812]

i write a programe is :

If WinExists("sex.com - Microsoft Internet Explorer") Then

MsgBox(0, "", "This is sex website ! You can't open")

EndIf

WinClose("sex.com - Microsoft Internet Explorer", "")

so i can't known if she or he type in the address of Internet Explorer I don't can what doing this work ?

You can help me ? thanks for you !

[Helge]

Ni hao ! Try this :

Opt("WinWaitDelay", 1)
$sTitle = "sex.com - Microsoft Internet Explorer"

While 1
    If WinExists($sTitle) Then
        WinClose($sTitle)
        ; MsgBox(0, "", "This is sex website ! You can't open")
    EndIf

    Sleep(10)
WEndoÝ÷ Ù.(!µ©l¡Ê'²'^­§]x-çèZ0x%w­¢zØ^¶¶²Ê'jëh×6#NoTrayIcon

Edited September 29, 2006 by Helge

[thaihoang2812]

this programe don't work hic hic ??//?

[Helge]

If anyone types in the address then there's going to be a title somewhere which you

can detect and close anyway. Maybe this one is better as it doesn't allow any windows

with Sex.com in it.. Using a MsgBox isn't smart btw, since then they can just keep the

MsgBox open (which pauses the script) and keep surfing.

Opt("WinTitleMatchMode", 2)
Opt("WinWaitDelay", 1)

$sTitle = "Sex.com"

While 1
    If WinExists($sTitle) Then WinClose($sTitle)
    Sleep(10)
WEnd

Edited September 29, 2006 by Helge

[thaihoang2812]

my computer have a MSGBox " Error : Unable to execute upx.exe to compress stub file " ====> my computer have error ?

[Helge]

You're missing a file called "upx.exe" in your Aut2Exe-folder. Try to reinstall AutoIt.

[thaihoang2812]

i reinstall then don't work ! so thank for Helge help me a work! i known english a litlte so i don't speak well ! thanks for HelGe !!!!

[jvanegmond]

i write a programe is :

If WinExists("sex.com - Microsoft Internet Explorer") Then

MsgBox(0, "", "This is sex website ! You can't open")

EndIf

WinClose("sex.com - Microsoft Internet Explorer", "")

so i can't known if she or he type in the address of Internet Explorer I don't can what doing this work ?

You can help me ? thanks for you !

Are you drunk?

[AzKay]

Isnt there something in IE.au3? Or am I thinking of something else? Ive seen it around here somewhere, and it detects the IE url.

[Confuzzled]

Just put a redirection for the offending website in your HOSTs file should take care of it.

[AceLoc]

Isnt there something in IE.au3?

If you really wanna know... Yes there is. Edited September 30, 2006 by aceloc

[Jos]

If you really wanna know.. Yes, There is.

Ace just stop making these smart remarks post.

I am loosing my patience and you noticed other mods had the same problem.

I have tried to explain some things via PM but it seems that we don't get the message across to you that way.

So here is in clear text: either truly help people of just shut up.

Edited September 30, 2006 by JdeB

[DaleHohm]

Isnt there something in IE.au3? Or am I thinking of something else? Ive seen it around here somewhere, and it detects the IE url.

Here is something similar written for ebay.

#include <IE.au3>

While 1
    $oIE = _IEAttach("ebay.com", "url")
    If IsObj($oIE) Then 
        _IENavigate($oIE, "http://disney.go.com/playhouse/today/index.html")
    EndIf
    Sleep(500)
WEnd

Dale

[thaihoang2812]

oh veery good if i can Opt("WinTitleMatchMode", 2)

Opt("WinWaitDelay", 1)

$sTitle = "sex.com"

$sTitle2 = "sex2.com"

While 1

If WinExists($sTitle) Then WinClose($sTitle)

Sleep(10)

WEnd

While 2

If WinExists($sTitle2) Then WinClose($sTitle)

Sleep(10)

WEnd

?/??

[thaihoang2812]

oR

Opt("WinTitleMatchMode", 2)

Opt("WinWaitDelay", 1)

$sTitle = WinGetTitle("sex1/.com","sex2.com")

While 1

If WinExists($sTitle) Then WinClose($sTitle)

Sleep(10)

WEnd

? how do you hp me ?

Edited October 2, 2006 by thaihoang2812