<%@ Language=VBScript %> <%Response.Buffer=true%> <% dim todaysDate todaysDate=now() If Not Request.Form("action") = "send" then showPage = displayHTML() 'ElseIf Request.Form("name") = "" or Request.Form("email") = "" then ' errorMSG = "One of the required fields was not input!" ' showPage = displayHTML() Else If Request.Form("Credited") = "" then creditIt = "YES" Else creditIt = "NO" End If Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "smtp.webdsi.com" Mail.From = Request.Form("email") Mail.FromName = Request.Form("name") Email = "custom@acadiacom.net" Mail.AddAddress Email Mail.Subject = "Custom Catering: Recipe Contribution" strHTML = "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "
Kind of Dish:" & Request.Form("Catagory") & "
Recipe Name:" & Request.Form("Recipe_Name") & "
Yield:" & Request.Form("Yield") & "
Ingredients:" & Request.Form("Ingredients") & "
Method:" & Request.Form("Method") & "
Alternate Method:" & Request.Form("Alternate_Method") & "
Plate Presentation:" & Request.Form("Plate_Presentation") & "
Chefs Notes:" & Request.Form("Chefs_Notes") & "
  
Name:" & Request.Form("Name") & "
Address:" & Request.Form("Address") & "
City, State, Zip:" & Request.Form("City_St_Zip") & "
E-mail:" & Request.Form("e_mail") & "
Phone:" & Request.Form("Phone") & "
  
Credited:" & creditIt & "
" & _ "" & "
" & _ "" Mail.Body = "" & strHTML & "" Mail.IsHTML = True On Error Resume Next Mail.Send If Err <> 0 then Response.Write "An error occurred: " & Err.Description End If Set Mail = Nothing Response.Redirect("thanks.asp") End If Function displayHTML() %> Contributions

We are looking to share catering recipes with the WWW.  

 

Have you thrown a party and everyone just loved your dish? Tell us. We will send a bottle of Louisiana Hot Sauce for every recipe that we display to the WWW. So start typing!!

<%=errorMSG%>

What kind of dish is your recipe?

Recipe Name:

Yield:

Ingredients:

Method:

Alternate Method:

Plate Presentation:

Chef's Notes:

 

Tell us how to get in touch with you:

Name
Address
C,ST,Zip
e-mail
Phone
Do you want your name credited to the recipe? NO

By submitting this recipe, you authorize Aurora Catering the rights to publish it.
 
Go to Home Cookin' Page or Return to Catering Recipes
Chef Emile L. Stieffel, Aurora Catering, Inc. email address: ChefEmile@CustomCatering.net
Copyright © 2006 [Aurora Catering, Inc]. All rights reserved.
Revised: September 13, 2006.
<% End Function %>