Afternoon Delight Cafe

<% Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = "Afternoon Delight Cafe" Mailer.FromAddress= "catering@afternoondelightcafe.com" Mailer.RemoteHost = "afternoondelightcafe.com" Mailer.AddRecipient "Tim Williams", "twillaims@afternoondelightcafe.com" Mailer.Subject = "AD Contact Info Request" 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 "Form information submitted..." else Response.Write "Mail send failure. Error was " & Mailer.Response end if %>

Thanks for visiting Afternoon Delight Cafe, we value you as a customer and want to make sure you receive the best service possible. If you would like to stop by our restaurant and try our delicious food please click here for directions. Our business hours for the restaurant are listed below, and please remember our Catering Services are available for any event at anytime. Hours: Monday to Saturday: 8:00am to 3:00pm Sundays: 8:30am to 3:00pm If you would like to send a comment or question please fill out the form below and make sure to complete all the fields to ensure a prompt answer.

Name:
Address:
City:	State:	Zip:

Phone:

Email:

Please type your question below and we will contact you as soon as possible.