שליחת המייל לא מתבצעת, למה?

זה הקוד שאמור לשלוח אבל זה פשוט לא קורה, למה?


Set Mailer = Server.CreateObject ("SMTPsvg.Mailer")
Mailer.FromName = "pepper"
Mailer.FromAddress = "[email protected]"
Mailer.ContentType = "text/html"
Mailer.Subject = "mynameispepper"
Mailer.BodyText = HTML
Mailer.RemoteHost = "22.245.97.16"
Mailer.AddRecipient "dude","[email protected]"
if Mailer.SendMail then