Xojo Plugin
Xojo Plugin
Extract Linked Domains from an HTML Email
See more Email Object Examples
Demonstrates the Chilkat Email.LinkedDomains method, which extracts the domain names from the hyperlinks in an HTML email. Lowercase domains are appended to a StringTable without creating duplicates. This example sets an HTML body with several links and lists the distinct domains.
Background: The set of domains a message links to is a strong signal for spam and phishing analysis — legitimate mail usually points at a few expected domains, while abusive mail often hides links to many unrelated or look-alike hosts.
LinkedDomains gives you that de-duplicated list directly. Note it only parses the links; it does not fetch them, so no network request is made.Chilkat Xojo Plugin Downloads
Dim success As Boolean
success = False
// Demonstrates the LinkedDomains method, which extracts the domain names from the
// hyperlinks in an HTML email. Lowercase domains are appended to a StringTable without
// creating duplicates.
Dim email As New Chilkat.Email
email.Subject = "LinkedDomains example"
// An HTML body containing several hyperlinks.
email.SetHtmlBody "<html><body>Visit <a href=""https://www.example.com/page"">Example</a>, <a href=""http://sales.contoso.com"">Contoso</a>, and <a href=""https://www.example.com/other"">Example again</a>.</body></html>"
// Extract the linked domains into a StringTable.
Dim domains As New Chilkat.StringTable
success = email.LinkedDomains(domains)
If (success = False) Then
System.DebugLog(email.LastErrorText)
Return
End If
Dim n As Int32
n = domains.Count
Dim i As Int32
For i = 0 To n - 1
System.DebugLog(domains.StringAt(i))
Next