Josh
09-01-2014, 01:50 AM
strhtml = Req("GET", "[Only registered and activated users can see links]", "")
boards = GetBetweenAll(strhtml, " align='left' style='border-top: 1px solid black;'><a href='boardlist.phtml?board=", "'><img")
For x = 0 To boards.Count - 1
For z = 1 To 241 Step 40
strhtml = Req("GET", "[Only registered and activated users can see links]" & boards.Item(x) & "&next=" & z, "")
usernames = GetBetweenAll(strhtml, """ class=""blistSmall""><b>", "</b></a>")
For y = 0 To usernames.Count - 1
Setaddlist_ThreadSafe(ListBox1, usernames.Item(y))
Next
Next
Next
Simple little script to grab usernames from boards (every page, of every board).
I thought it was useful. :P Used it to request a ton of neofriends, because I have too much time.
boards = GetBetweenAll(strhtml, " align='left' style='border-top: 1px solid black;'><a href='boardlist.phtml?board=", "'><img")
For x = 0 To boards.Count - 1
For z = 1 To 241 Step 40
strhtml = Req("GET", "[Only registered and activated users can see links]" & boards.Item(x) & "&next=" & z, "")
usernames = GetBetweenAll(strhtml, """ class=""blistSmall""><b>", "</b></a>")
For y = 0 To usernames.Count - 1
Setaddlist_ThreadSafe(ListBox1, usernames.Item(y))
Next
Next
Next
Simple little script to grab usernames from boards (every page, of every board).
I thought it was useful. :P Used it to request a ton of neofriends, because I have too much time.