Visual FoxPro

Parse a URL into its Component Parts

See more HTTP Examples

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

LOCAL lnSuccess
LOCAL loUrl
LOCAL lcUrlStr

lnSuccess = 0

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