Hiv links ud af hjemmeside

regex

Til inspiration:

        Private Shared ReadOnly re As New Regex("<a\s+[^>]*href\s*=\s*[""']([^""']*)[""'][^>]*>", RegexOptions.Compiled Or RegexOptions.IgnoreCase)
        Public Shared Function LinkParse(html As String) As List(Of String)
            Dim res As New List(Of String)()
            For Each m As Match In re.Matches(html)
                res.Add(m.Groups(1).Value)
            Next
            Return res
        End Function

OK ?

?