VBScript
VBScript
Unobfuscate a Spammy Email
See more Email Object Examples
Demonstrates the Chilkat Email.UnSpamify method, which unobfuscates an email by undoing common spammer tricks — it removes comments from HTML bodies and unobfuscates hyperlinked URLs. This example cleans an HTML body whose link was broken up by an inserted comment.
Background: Spammers deliberately scramble HTML to slip past filters — inserting empty comments in the middle of words or URLs (
exa<!--x-->mple.com), or otherwise obfuscating links — so the message renders normally to a human but confuses naive keyword matching. UnSpamify reverses those tricks, producing a normalized body that is easier to analyze, classify, or scan for the real destination of its links.Chilkat VBScript Downloads
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' Demonstrates the UnSpamify method, which unobfuscates an email by undoing common spammer
' tricks: it removes comments from HTML bodies and unobfuscates hyperlinked URLs.
set email = CreateObject("Chilkat.Email")
email.Subject = "UnSpamify example"
' An HTML body with an obfuscating comment inserted into a hyperlink.
email.SetHtmlBody "<html><body>Visit <a href=""http://exa<!--x-->mple.com"">our site</a>.</body></html>"
' Undo the obfuscation.
email.UnSpamify
cleaned = email.GetHtmlBody()
outFile.WriteLine(cleaned)
outFile.Close