Regex and URLs [Resolved]

[Pirate]

Using Regex (or perhaps any other way), how can I strip the homepage of a URL like this one :

http://www.vbforums.com/newthread.ph...ead/forumid=25

so I get this result :

http://www.vbforums.com


Thanks ,

[crptcblade]

Found this and modified it a little...

Private Sub Button1_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) Handles Button1.Click
        Dim s As String = "http://www.vbforums.com/newthread.php?s=&action/newthread/forumid=25"
        Dim sp As String = "^(http:\/\/)?([^\/]+)"
        Dim ms As MatchCollection
 
        ms = Regex.Matches(s, sp)
 
        MsgBox(ms(0).Value)
 
    End Sub

[crptcblade]

Be sure to import System.Text.RegularExpressions

[Pirate]

Works solid . Thanks !

[Mike Hildner]

Another way, not as cool as regex, but certainly less cryptic

Dim s As String = "http://www.vbforums.com/newthread.php?s=&action/newthread/forumid=25"
        Dim chop As Integer
        chop = s.IndexOf("/", 7)
        Dim s2 As String = s.Substring(0, chop)
        Debug.WriteLine(s2)

Of course that's assuming some things, but you know what I mean.

[Pirate]

Originally posted by Mike Hildner
Another way, not as cool as regex, but certainly less cryptic

Dim s As String = "http://www.vbforums.com/newthread.php?s=&action/newthread/forumid=25"
        Dim chop As Integer
        chop = s.IndexOf("/", 7)
        Dim s2 As String = s.Substring(0, chop)
        Debug.WriteLine(s2)

Of course that's assuming some things, but you know what I mean.

It won't work if a url starts with (https) . Nice try

[Mike Hildner]

That may be true, but allow me to quote myself

Of course that's assuming some things, but you know what I mean.

That example hard coded the seventh position. One could easily determine the position of a double slash, if that worked for you. It's not my point to try do out do regex, but as your title implied, I'm just suggesting another way.

Not that I recommend one over the other.

[Pirate]

Yah I guess , it's another way . It's cool and if I add some stuff it would as accurate as regex (lots of work) . Thanks though . This gives some insights to other things .