Re: bash.org
Paul <[email protected]>
| Newsgroups | gmane.comp.windows.shells.litestep |
|---|---|
| Message-ID | <[email protected]> |
Paul wrote:
> #732536 +(726)- [X]
>
> <El_Pompo> what would be the best language to build a crawler in?
> <Emetri> jawa.
>
> Come on, that's frickin funny.
----------------------
<DigDug> i think i'm gonna walk to the movie theater and see dinosaur...
<kimy-> and be surrounded by like 10 year old girls?
<Amanda_> He said Dinosaur, not N'Sync.
----------------------
<cooksii> incest is at least something the whole family can do.
----------------------
<Mishmashi> yesterday i got bisexual services
----------------------
he he....know what that is? That is an excerpt from the gi-normous text
file I have of all of the BASH.org quotes.
#include <IE.au3>
$oIE = _IECreate("http://bash.org/?browse")
; Count of dropdown entries = pagecount
$oBrowse = _IEGetObjByName($oIE, "browse")
$lastPage = $oBrowse.options.length
$file = FileOpen("C:\bash.txt", 2)
For $page = 1 to $lastPage
_IENavigate($oIE, "http://bash.org/?browse&p=" & $page)
$oPs = _IETagNameGetCollection($oIE, "p") ; get all <P>
For $oP in $oPs
If $oP.classname = "qt" then
FileWriteLine($file, $oP.innerText)
FileWriteLine($file, "----------------------")
EndIf
Next
Next
FileClose($file)
This little script in AutoIt opens up IE and downloads only the quotes
and continues to save it to one file. Now it is only a matter of time
before I can figure out how to mass format this for other uses.
>
>
> ---------------------------------------------------------------------
> Can't Unsubscribe? Check http://desktopian.org/listunsub.html
> LS List Homepage: http://wuzzle.org/list/litestep.php
> Get the LS FAQ: http://lsfaq.shellfront.org
>
>
---------------------------------------------------------------------
Can't Unsubscribe? Check http://desktopian.org/listunsub.html
LS List Homepage: http://wuzzle.org/list/litestep.php
Get the LS FAQ: http://lsfaq.shellfront.org