[REBOL] Re: Downloading patents?
From: bpaddock:csonline at: 1-Sep-2001 9:32
On Saturday 01 September 2001 03:31 am, Anton wrote:
> Now, it's up to you to stick it all together into a nice
> program. :)
Just working out the looping through all of the pages parts, this is what I
came up with. Gets the max page count and simply prints the page number at
I expect it is more complex than it needs to be since this is my first real
Rebol program, how do I do better?:
Watch for line wrapping in the URL: line.
Title: "Get Patent, looping test"
page: read url
LastPage: second parse copy/part find page "TOTPG=" 10 "=&"
repeat CurrentPageNumber to-integer LastPage [ print CurrentPageNumber ]