Breadcrumbs

[Codex]

The reason it's not working is because your Gecko browser has about:blank as the url, which is not a valid one.

Try replacing the code with this:

Code: Select all

If Regex.IsMatch(Geckobrowser1.url.tostring, "(https?ftp):\/\/([0-9a-zA-Z][-\w]*[0-9a-zA-Z]\.)+[a-zA-Z]{2,9})(:\d{1,4})?([-\w\/#~:.?+=&%@~]*)/") Then 
Dim iconURL = Geckobrowser1.Url.ToString & "/favicon.ico"
        Dim request As System.Net.WebRequest = System.Net.HttpWebRequest.Create(iconURL)
        Dim response As System.Net.HttpWebResponse = request.GetResponse()
        Dim stream As System.IO.Stream = response.GetResponseStream()
        Dim iconimage As Bitmap = Image.FromStream(stream)
        Me.Icon = Icon.FromHandle(iconimage.GetHicon())
End if

I haven't tested it, but it should work.
And you need to import System.Text.RegularExpressions at the top.
(Imports System.Text.RegularExpressions)

[MrAksel]

Did you write that regex yourself? I can spot some errors
My best shot is:

Code: Select all

"((http|https|ftp):\/\/)?[0-9a-zA-Z\-_]{1,63}\.([0-9a-zA-Z\-_]{1,63}\.){1,123}[0-9a-zA-Z\-_]{1,63}([:\d]{1,5})?[\/]?([\w\.-][\/]?)*

[dj1437]

The code fails, it says too many )'s

[MrAksel]

Was that my regex? Codex's has errors so that won't work. I have tested mine on multiple URLs and it matches all correctly. Just now I counted the ( and )'s, and there is an equal amount so that shouldn't be an error.