Search box inside GUI

[walle]

My scripting knowledge is limited, anyway. I want to

recive the result information in this search window below.

I don't know if it's possible, but it would be lovely if someone

could point me in the right direction.

Is it possible to rip the whole search window into my

GUI, so if I use the search function inside the gui, the

examples will show up in a window underneaf the search

box.

Walle

Edited October 7, 2007 by walle

[walle]

Playing around, trying to get anywhere.

How do I iniwrite every $sLinkText?, msgbox(0,"",$sLinkText) shows about 4 diffent names.

But when I use iniwrite, it only writes the first one.

#include <IE.au3>
$Search2 = "Shrek"
$oIE = _IECreate("http://www.swedvdr.org/browse.php?search=" & $Search2)
$oLinks = _IELinkGetCollection($oIE)
For $oLink in $oLinks
    $sLinkText = _IEPropertyGet($oLink, "innerText")
    If StringInStr($sLinkText, $Search2) Then
        IniWrite(@HomeDrive & "\Temp\Burnbuddy.ini", "Search", "movies", $sLinkText)
        ;msgbox(0,"",$sLinkText)
        ;_IEAction($oLink, "click")
        ;ExitLoop
    EndIf
Next

[Valuater]

#include <IE.au3>
$count = 0
$Search2 = "Shrek"
$oIE = _IECreate("http://www.swedvdr.org/browse.php?search=" & $Search2)
$oLinks = _IELinkGetCollection($oIE)
For $oLink in $oLinks
    $sLinkText = _IEPropertyGet($oLink, "innerText")
    If StringInStr($sLinkText, $Search2) Then
        $count += 1
        IniWrite(@HomeDrive & "\Temp\Burnbuddy.ini", "Search Movies", $count, $sLinkText)
        msgbox(0,$count,$sLinkText)
        ;_IEAction($oLink, "click")
        ;ExitLoop
    EndIf
Next

8)

[walle]

Edit:

Just came up with another solution, thx anway!

Thanks!

So, this is what I have done so far.

I need help with some sort of loop, a loop that will

check the input in $Search everytime something is writen

in that input and then execute the script below.

Second, the guiwindow below, it shows release names.

Can I make them clickable, is if i click on release name

AUTOITV1, the release name will show up in the search input box

/Walle

$Search = GUICtrlCreateInput("ABC", xx, xx, xx, xx)

expandcollapse popup

$count = 0
$Search2 = GUICtrlRead($Search)
$oIE = _IECreate("http://www.swedvdr.org/browse.php?search=" & $Search2,0,0)
$oLinks = _IELinkGetCollection($oIE)
For $oLink in $oLinks
    $sLinkText = _IEPropertyGet($oLink, "innerText")
    If StringInStr($sLinkText, $Search2) Then
        $count += 1
        IniWrite(@HomeDrive & "\Temp\Burnbuddy.ini", "Search Movies", $count, $sLinkText)
        ;msgbox(0,$count,$sLinkText)
        ;_IEAction($oLink, "click")
        
    EndIf
Next



$Form2 = GUICreate("Search", 202, 133, 565, 576,$WS_POPUP)
$Edit1 = GUICtrlCreateList("", 0, 0, 202, 133,$PBS_SMOOTH,$WS_EX_WINDOWEDGE)
GUICtrlSetData(-1, "__________Releaser_______")
GUISetState(@SW_SHOW)


$READ = IniReadSection(@HomeDrive & "\Temp\Burnbuddy.ini", "Search Movies")
For $x = 1 To $READ[0][0]
   ;msgbox(0,"",$READ[$x][1])
   _GUICtrlListAddItem ($Edit1, $READ[$x][1])
 Next

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

Edited October 7, 2007 by walle