(Excel) Parse a URL into its Component Parts

Demonstrates how to parse a URL into it's component parts.

Download Excel Class Modules Chilkat Excel Class Modules

Dim url As Chilkat.Url
Set url = Chilkat.NewUrl


urlStr = "https://www.amazon.com/Anarchy-State-Utopia-Robert-Nozick/dp/0465051006/ref=sr_1_1?s=books&ie=UTF8&qid=1430344305&sr=1-1&keywords=nozick#frag123"


success = url.ParseUrl(urlStr)
' Assume success..

Debug.Print "URL: "; urlStr
Debug.Print "Host: "; url.Host
Debug.Print "Port: "; url.Port
Debug.Print "HostType: "; url.HostType
Debug.Print "Ssl: "; url.Ssl
Debug.Print "Path: "; url.Path
Debug.Print "Query: "; url.Query
Debug.Print "Frag: "; url.Frag
Debug.Print "----"

urlStr = "http://matt:secret@www.chilkatsoft.com:8080/somepath.asp?test=123&size=2"

success = url.ParseUrl(urlStr)
' Assume success..

Debug.Print "URL: "; urlStr
Debug.Print "Host: "; url.Host
Debug.Print "Port: "; url.Port
Debug.Print "HostType: "; url.HostType
Debug.Print "Ssl: "; url.Ssl
Debug.Print "Login: "; url.Login
Debug.Print "Password: "; url.Password
Debug.Print "Path: "; url.Path
Debug.Print "Query: "; url.Query
Debug.Print "Frag: "; url.Frag