<% 'on error resume next sFrom = "info@inkblotstudio.com" sTo = "jfontaine@inkblotstudio.com" sSubj = "Sound Strategies Test Email - Submitted " & now() Set objMail = CreateObject("CDONTS.Newmail") 'MSG Text. str="" str=str+"Sound Strategies - Demonstration" str=str+"" str=str+"" str=str+"
" str=str+"" str=str+"
" str=str+"

Dear John:

" str=str+"

Thank you for your time and interest in Soundstrategies the leader in Messages and Music On-Hold for the Automobile Industry for the last 18 years.

" str=str+"

With Soundstrategies you get great customer service, no long term contracts, 24 hour turnaround, and a staff of voice talent and copywriters who understand your businesses thoroughly.

" str=str+"

Give the demo a try, if you like what you see and here give us a call for a free customized demo on your dealership.

" str=str+"

Car Dealer Pricing:

" str=str+"

$127.50 per month for unlimited changes of messages plus a Free Holiday CD.

" str=str+"

$98.00 per month for up to 6 changes per year plus a Free Holiday CD.

" str=str+"

Multiple location discounts available...

" str=str+"

Thanks Again,

" str=str+"

Mike Orrick
866-768-6311
mike@soundstrategies.net
www.soundstrategies.net

" str=str+"


" str=str+"" str=str+"" str=str+"" str=str+"

" str=str+"" str=str+"" str=str+"" str=str+"" str=str+"" str=str+"
Click here to download the Real One Player:
Can't play the Real Audio file above? Click the link below to open the sample in your browser or media player:
" ' Set the message properties. objMail.From = sFrom objMail.To = sTo objMail.Subject = sSubj objMail.Body = str ' Set the message Format. objMail.MailFormat = 0 'MIME objMail.BodyFormat = 0 '0 HTML / 1 Text ' Send the message. objMail.Send Set objMail = Nothing %>