(Visual FoxPro) Parse a URL into its Component Parts

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loUrl
LOCAL lcUrlStr
LOCAL lnSuccess

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Url')
loUrl = CreateObject('Chilkat.Url')

lcUrlStr = "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"

lnSuccess = loUrl.ParseUrl(lcUrlStr)
* Assume success..

? "URL: " + lcUrlStr
? "Host: " + loUrl.Host
? "Port: " + STR(loUrl.Port)
? "HostType: " + loUrl.HostType
? "Ssl: " + STR(loUrl.Ssl)
? "Path: " + loUrl.Path
? "Query: " + loUrl.Query
? "Frag: " + loUrl.Frag
? "----"

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

lnSuccess = loUrl.ParseUrl(lcUrlStr)
* Assume success..

? "URL: " + lcUrlStr
? "Host: " + loUrl.Host
? "Port: " + STR(loUrl.Port)
? "HostType: " + loUrl.HostType
? "Ssl: " + STR(loUrl.Ssl)
? "Login: " + loUrl.Login
? "Password: " + loUrl.Password
? "Path: " + loUrl.Path
? "Query: " + loUrl.Query
? "Frag: " + loUrl.Frag

RELEASE loUrl