checkbox help

[jellyfish]

I am having trouble with a check box. Go figure. I have the check box in place but it doesnt work. Check, uncheck. If you look at the script, Its pretty self explanatory what I am trying to acomplish with the checkbox. Also dont know how to script that. I am brandnewbie. Help Please

expandcollapse popup

#include <GUIConstants.au3>
#include <IE.au3>

_IEErrorHandlerRegister ()

$oIE = _IECreateEmbedded ()


$Form1 = GUICreate("Torrent Search V1.2 (Jellyfish)", 691, 675, 214, 69)
GUISetFont(10, 800, 0, "MS Sans Serif")
$Label0 = GUICtrlCreateLabel("Check Box To Erase Internet Explorer Temporary Files On Exit.", 24, 55, 230, 50)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$checkbox = GUICtrlCreateCheckbox("", 260, 65, 20, 20)
GuiCtrlSetState(-1, $GUI_CHECKED)
$Torrent = GUICtrlCreateInput("", 24, 10, 217, 24)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetState(-1, $GUI_ACCEPTFILES)
$Label1 = GUICtrlCreateLabel("Enter Your Search Here", 56, 34, 145, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Choose A Torrent Site To Search", 392, 0, 201, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("1.", 0, 10, 19, 28)
GUICtrlSetFont(-1, 15, 400, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("2.", 368, 0, 19, 20)
GUICtrlSetFont(-1, 15, 400, 0, "MS Sans Serif")
$Button1 = GUICtrlCreateButton("TorrentSpy", 296, 32, 81, 25, 0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Button2 = GUICtrlCreateButton("BtJunkie", 296, 64, 83, 25, 0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Button3 = GUICtrlCreateButton("IsoHunt", 392, 32, 83, 25, 0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Button4 = GUICtrlCreateButton("BushTorrents", 392, 64, 83, 25, 0)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Button5 = GUICtrlCreateButton("Torrentz", 488, 32, 83, 25, 0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Button6 = GUICtrlCreateButton("MiniNova", 488, 64, 83, 25, 0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Button7 = GUICtrlCreateButton("The Pirate Bay", 584, 32, 91, 25, 0)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Button8 = GUICtrlCreateButton("MyBittorrent", 584, 64, 91, 25, 0)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$GUIActiveX = GUICtrlCreateObj($oIE, 5, 90, 680, 580)
GUISetState()

_IENavigate ($oIE, "www.google.com")

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $Button1
    _IENavigate ($oIE, "http://torrentspy.com/search?query="&GUICtrlRead($Torrent)&"&submit.x=29&submit.y=8")
    Case $Button2
    _IENavigate ($oIE, "http://www.btjunkie.org/search?q="&GUICtrlRead($Torrent))
    Case $Button3
    _IENavigate ($oIE, "http://www.isohunt.com/torrents/?ihq="&GUICtrlRead($Torrent))
    Case $Button4
    _IENavigate ($oIE, "http://www.bushtorrent.com/torrents.php?search=&words="&GUICtrlRead($Torrent))
    Case $Button5
    _IENavigate ($oIE, "http://www.torrentz.com/search_"&GUICtrlRead($Torrent))
    Case $Button6
    _IENavigate ($oIE, "http://thepiratebay.org/search.php?q="&GUICtrlRead($Torrent))
    Case $Button7
    _IENavigate ($oIE, "http://www.mininova.org/search/?search="&GUICtrlRead($Torrent))
    Case $Button8
    _IENavigate ($oIE, "http://www.mybittorrent.com/?keywords="&GUICtrlRead($Torrent))
    EndSwitch
WEnd

Ok I fixed the problem with the checkbox not working. The label on the left side of it was conflicting with it.

Edited September 26, 2006 by jellyfish