Splitting A String.

[AwAke]

So atm im using;

$oTR = _IETagnameGetCollection($oIE, "TR")
For $oLink In $oTr
   $result = _IEPropertyGet($oLink, "innertext")
   MsgBox(0, "", $result)
Next

Which returns, as an example, "Video > MoviesTheGolden.Compass.2007.Eng.DVDscr.Divx-LTT02-01 2008706.29 MIB223115")

----------------------------------------|---Catagory---|------------------------------Name------------------------------------|----Size----|Se|-Le-|

So I would basically like to split the string so that it only returns the SE part, '223'. A further problem is that it doesnt come as a consistent length and can range from 1 digit to 5+.

All help is appreciated,

Thanks in advance.

[PsaltyDS]

So atm im using;

$oTR = _IETagnameGetCollection($oIE, "TR")
For $oLink In $oTr
   $result = _IEPropertyGet($oLink, "innertext")
   MsgBox(0, "", $result)
Next

Which returns, as an example, "Video > MoviesTheGolden.Compass.2007.Eng.DVDscr.Divx-LTT02-01 2008706.29 MIB223115")

----------------------------------------|---Catagory---|------------------------------Name------------------------------------|----Size----|Se|-Le-|

So I would basically like to split the string so that it only returns the SE part, '223'. A further problem is that it doesnt come as a consistent length and can range from 1 digit to 5+.

All help is appreciated,

Thanks in advance.

Are you sure the TR does not contain individual TD elements for those parts? If so, you might address that TD element by index and get only what you want.

[TerarinK]

They could contain anything other then the <TR> block but that is good to have to narrow the search down, but you need something else inside that block to search in order to get the information you are seeking

[AwAke]

I see, I tried it however it just return empty strings all the time. My code atm is;

#include <IE.au3>
$oIE = _IECreate("http://thepiratebay.org/search/The Golden Compass/0/99/0")
$oTR = _IETagnameGetCollection($oIE, "TD", 1)
MsgBox(0, "", $oTR)

Ive also tried incrimenting the index upto 7.

If I remove the index, and put it into a for loop it returns the value I need at the 5th index.

Edited January 31, 2009 by AwAke

[TerarinK]

For example because I don't know what site your using you have to check

$result = _IEPropertyGet($oLink, "outerhtml")

This will tell you what there is in more detail, you could even select what you want from this if you want to because you have more certain aspects coming into play on this one

[AwAke]

I see, however I believe the above example, when working will do exactly what I need.

Im stumped on why it doesnt return anything if I specify an index :/ but when putting into a for loop and no index it works :|

[Authenticity]

Try the TD tag with For...In...Next loop but use the .outerText property of the object. I believe that it's about each 4th or 5th that contain the file size.

[TerarinK]

Hopefully this will help you out

#include <IE.au3>

$oIE = _IECreate("http://thepiratebay.org/search/The Golden Compass/0/99/0")

$oTr = _IETagnameGetCollection($oIE, "TR")
For $oTrs In $oTr
    $oTd = _IETagnameGetCollection($oTrs, "TD")
    For $oTds In $oTd
        $result = _IEPropertyGet($oTds, "outerhtml")
        MsgBox(0, "", $result)
    Next
Next

[TerarinK]

Here is what you want with your definition of SE

#include <IE.au3>

$oIE = _IECreate("http://thepiratebay.org/search/The Golden Compass/0/99/0")

$oTr = _IETagnameGetCollection($oIE, "TR")
For $oTrs In $oTr
    $oTd = _IETagnameGetCollection($oTrs, "TD")
    Local $testing = 0
    For $oTds In $oTd
        $testing = $testing + 1
        $result = _IEPropertyGet($oTds, "outertext")
        If $testing = 7 Then MsgBox(0, "", $result)
    Next
Next

[Authenticity]

I've let my-self modifying your code:

#include <IE.au3>

$testing = 0
$oIE = _IECreate("http://thepiratebay.org/search/The Golden Compass/0/99/0")
$oTDs = _IETagnameGetCollection($oIE, 'TD')


For $oTD In $oTDs

    $testing += 1
    If Not Mod($testing, 5) And $testing Then
        ConsoleWrite($oTD.outerText & @CRLF)
        $testing = -2
    EndIf
Next

[TerarinK]

That code gets the file size and not the seeding

[Authenticity]

lol

Forgive me, I though he wants the size part:

#include <IE.au3>

$testing = 0
$oIE = _IECreate("http://thepiratebay.org/search/The Golden Compass/0/99/0")
$oTDs = _IETagnameGetCollection($oIE, 'TD')


For $oTD In $oTDs

    $testing += 1
    If Not Mod($testing, 6) And $testing Then
        ConsoleWrite($oTD.outerText & @CRLF)
        $testing = -1
    EndIf
Next

[TerarinK]

why not do this the easy way and instead of -1 why not add one to the testing like so:

#include <IE.au3>

$oIE = _IECreate("http://thepiratebay.org/search/The Golden Compass/0/99/0")
$oTDs = _IETagnameGetCollection($oIE, 'TD')

$testing = 1
For $oTD In $oTDs
    $testing += 1
    If Not Mod($testing, 7) And $testing Then 
        ConsoleWrite($oTD.outerText & @CRLF)
    EndIf
Next

Your doing far less computing, lol. Except you would have to change the 6 to a 7 because there are 7 elements inside there. That way he can easily change it. Better yet you could setup a variable if you want to and ask him during the execution what he wants and get it for him

[AzKay]

#include <string.au3>

$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET", "http://thepiratebay.org/search/The%20Golden%20Compass/0/99/0", False)
$oHTTP.Send()

$Ret = _StringBetween($oHTTP.ResponseText, "<td class=""vertTh"">", "</tr>")
For $i = 0 To UBound($Ret) -1
    $RetSE = _StringBetween($Ret[$i], "<td align=""right"">", "</td>")
    ConsoleWrite($RetSE[1] & @CRLF)
Next

[AwAke]

Woah thanks guys, all examples are great. I couldnt of asked me more =]

Thanks alot, I appreciate all the help

-AwAke

[TerarinK]

#include <string.au3>

$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("GET", "http://thepiratebay.org/search/The%20Golden%20Compass/0/99/0", False)
$oHTTP.Send()

$Ret = _StringBetween($oHTTP.ResponseText, "<td class=""vertTh"">", "</tr>")
For $i = 0 To UBound($Ret) -1
    $RetSE = _StringBetween($Ret[$i], "<td align=""right"">", "</td>")
    ConsoleWrite($RetSE[1] & @CRLF)
Next

I must say nice code there just one thing is that he can read only 3 of the 7 table marks. Not to say this is bad or anything but people want a overview of everything even if it isn't Awaken because I use that to. However this is very speedie for Awaken remark on finding seed because you actually went into the IE.au3 file and selectively choose to create and find the string instead of having the selected function do it.