(Excel) CanonicalizeUrl

The CanonicalizeUrl method is a utility function that canonicalizes a URL into a standard form to avoid duplicates. For example, "http://www.chilkatsoft.com/" and "http://www.chilkatsoft.com/default.asp" are the same URL.

Download Excel Class Modules Chilkat Excel Class Modules

Dim spider As Chilkat.Spider
Set spider = Chilkat.NewSpider

' Does a DNS lookup to find the default domain, which may or may not include the "www." depending on the DNS results.
' Also domain names are converted to lowercase:
Debug.Print spider.CanonicalizeUrl("http://www.ChilkatSoft.com/")

' CanonicalizeUrl will drop the HTML fragment:
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com/purchase2.asp#buyZip")

' If a username/password is in the URL, it gets dropped:
Debug.Print spider.CanonicalizeUrl("http://username:password@www.chilkatsoft.com/purchase2.asp#buyZip")

' Port 80 and 443 are dropped:
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com:80/purchase2.asp")
Debug.Print spider.CanonicalizeUrl("https://www.paypal.com:443/")

' Removes default pages:
' default.asp, index.html, index.htm, default.html, index.htm, default.htm
' index.php, index.asp, default.php, .cfm, .aspx, ,php3, .pl, .cgi, .txt, .shtml, .phtml
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com/index.asp")
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com/index.asp")
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com/index.php")
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com/index.pl")
Debug.Print spider.CanonicalizeUrl("http://www.chilkatsoft.com/index.htm")

' Output:
' http://chilkatsoft.com/
' http://chilkatsoft.com/purchase2.asp
' http://chilkatsoft.com/purchase2.asp
' http://chilkatsoft.com/purchase2.asp
' https://www.paypal.com/
' http://chilkatsoft.com/
' http://chilkatsoft.com/
' http://chilkatsoft.com/
' http://chilkatsoft.com/
' http://chilkatsoft.com