StringRegExp Question

[Aeterna]

I'm taking information of a webpage that has google feed links

example: http://www.google.com/alerts/feeds/1001429...773879324373026

StringRegExp($body, "http://www.google.com/alerts/feeds/ (digits) / (digits))"

It looks like theres 20 digits in the first block and 19 in the second, but is there a better way than doing /d/d/d/d/d/d etc... ?

[ProgAndy]

try (\d+) or (\d{19}) and (\d{20})

\d+ matches at least one digit followed by as many digits as possible

\d{19} matches 19 digits

\d{20} ... guess ... 20 digits, right.

Edited April 18, 2009 by ProgAndy

[Aeterna]

hmm, maybe I'm doing something wrong.

CODE

Func GetLinks()

_IENavigate($oIE, "http://www.google.com/alerts/manage?hl=en&gl=us")

_IELoadWait($oIE)

$body = _IEBodyReadHTML($oIE)

$links = StringRegExp($body, "(\D+)(\d+)(\D)(\d+)", 1)

For $link in $links

FileWriteLine($FeedFile, $link)

Next

EndFunc

http://www.google.com/alerts/feeds/1001429...773879324373026

There's a bunch of links that look like that, just the digits are different, i want to take each entire link and write it as a line in $FeedFile.

Any ideas?

[ProgAndy]

you have to set the brackets in an other way:

$link = "text text text text text http://www.google.com/alerts/feeds/10014295542174222516/2316773879324373026 tesxt tesxt tesxt "
$links = StringRegExp($link,"(http://\D+\d+\D\d+)",3)
For $i = 0 To UBound($links)-1
    ConsoleWrite($links[$i] & @CRLF)
Next

[Aeterna]

Solved thanks