Description: Use to indicate the following: < @ LANGUAGE = " VBSCRIPT" > < ' option explicit dim DbConn, connstr, db' Email Configuration Information dim SmtpHost, AdminName, AdminEmail, NeedAuth, EmailAccount, EmailPW SmtpHost = " smtp.263.net" AdminEmail = " XXX@263.net" NeedAuth = true ' the need for certification EmailAccount = " hubdog" EmailPW = " XXXX" AdminName = " administrator" ' Send email function SendMail (Email, Subject, Body) set MailSender = Server.CreateObject (" IndyMail.MailSender" ) MailSender.SetBody Body MailSender.SetFrom " " " " + AdminName+ " " " < " + AdminEmail+ " > " MailSender.SetHost SmtpHost MailSender.SetAuth NeedAuth MailSender.SetSenderName EmailAccount MailSender.SetSenderPW EmailPW MailSender.SetSubject Subject MailSender.SetTo Email SendMail = MailSender.Send end function >
To Search:
File list (Check if you may need any files):
mail\IndyMail.dll
....\IndyMail.cfg
....\IndyMail.dpr
....\CMailSender.pas
....\IndyMail_TLB.pas
....\IndyMail.res
....\IndyMail.tlb
mail