% function sendMailBatch( subject, recipName, recipAddress, fromName, fromAddress, replyToAddress, mailServer, MailBody) Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = fromName Mailer.FromAddress = fromAddress Mailer.ReplyTo = replyToAddress Mailer.RemoteHost = mailServer 'IP address is faster Mailer.Subject = subject Mailer.AddRecipient recipName, recipAddress Mailer.BodyText = MailBody Mailer.UseMSMailHeaders = false if Mailer.sendMail then sendMailBatch = true else sendMailBatch = Mailer.Response end if Set Mailer = Nothing end function %>

Quality Repairs On Consumer Electronics |
|||||
47 Years Serving The Area |
|||||
| DVD Players | Video Recorders | CD Players | Stereo Units | ||
| Low Vision Units | Projection/Direct View TV's | Microwave Ovens |
Computer Monitors |
||
|
Factory Authorized For Most Brands |
|||||
|
In Home Service Available & Senior Discounts |
|||||
*** Repair
Coupon ***
|
|||||