<% Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "Atomic Web Katz" Mailer.FromAddress= "trish@atomicwebkatz.com" Mailer.RemoteHost = "mail.atomicwebkatz.com" Mailer.AddRecipient "Name", "designkatz@atomicwebkatz.com" Mailer.AddExtraHeader "X-MimeOLE:Produced atomicwebkatz.com" Mailer.Subject = "Form Submission" strMsgHeader = "Form information follows" & vbCrLf for each qryItem in Request.Form strMsgInfo = strMsgInfo & qryItem & " - " & request.Form(qryItem) & vbCrLf next strMsgFooter = vbCrLf & "End of form information" Mailer.BodyText = strMsgHeader & strMsgInfo & strMsgFooter if Mailer.SendMail then Response.Write "" else Response.Write "Mail send failure. Error was " & Mailer.Response end if set Mailer = Nothing %>

Contact Us

*Name:
*Email address:
Phone
Domain Name
if any

Comments or questions

 


Home/About : Services : Portfolio : Cartoons : Flash
Rates/Contracts : Disclaimer : Privacy : Site Map : Trish's Blog
Contact Us - Texas and California

Copyrighted 1999-2006 by Atomic Web Katz© - All rights reserved
All original art work and original Flash movies copyrighted Atomic Web Katz©