[TheBarret]

Code

((?:http|https)(?::\/{2}[\w]+)(?:[\/|\.]?)(?:[^\s""]*))

- B

[Volim te]

Code

(https?://[-a-zA-Z?-??-?()0-9@:%_+.~#?&;//=]+)

Try that I hate regex so much!

[TheBarret]

Com'n goddamned are u that stupid and lazy? modify the damn regex we fucking spoon fed you every pattern for any domain, and still your begging for more spoon feeding.

im done with you.

[xNjQ8x]

convert links to URI and take the domain

Code

msgbox( ToURI("http://site.com/?longtext").host )
    Function ToURI(ByVal link As String) As Uri
      Return New Uri(link)
    End Function