Try this


        Dim URLMatch As Match = Regex.Match(Editor1.Text, "(?<http>(http:[/][/]|www.)([a-z]|[A-Z]|[0-9]|[/.]|)*)")

        If URLMatch.Success = True Then

            Response.Write("found a url")
            'your code to make a db record here

        End If

If the regular expression is not exactly what you need you'll find more on http://regexlib.com/

Hope this help.

Seb