All pastes #242119 Raw Edit

Unnamed

public text v1 · immutable
·published 2006-11-06 22:47 UTC
rendered paste body
<%
Set name=request.form("namesub")
Set number=request.form("phonenumsub")
Set email=request.form("emailsub")
Set time=request.form("timesub")
Set myMail=CreateObject("CDO.Message")
myMail.Subject="New Customer!"
myMail.From="customers@downhomememories.com"
myMail.To="kimmcmahon@downhomememories.com"
myMail.HTMLBody="<p><font size=+1>Name: & name & <br>Phone Number: & number & <br>Email Address: & email & <br>Best Time To Call: & time &<br></font></p>
myMail.Send
set myMail=nothing
set name=nothing
set email=nothing
set time=nothing
set number=nothing
Response.redirect("index.html")
%>