 |
 |
To
order:
1.
Enter CD quantity in the box under the CD.
2. Fill in your name, address, phone number, and email.
We
will immediately ship your order along with your invoice (tax
will be included).
You
can also call us at 310.451.8585
to place your order. (Ask for Kirsten Grenoble.)
It's that easy!
<%If request("Button")="Submit Order" then
Set objMail = Server.CreateObject("CDONTS.NewMail")
For each sRequest in Request.Form
Select Case sRequest
Case "From" objMail.From=request(sRequest)
Case "Button" 'this will cause the button to be skipped
Case else sBody=sBody & sRequest & ": " & request(sRequest) & chr(13) & chr(13)
fBody=fBody & "
" & sRequest & " - " & request(sRequest) & "
"
End select
Next
objMail.Body="Thank you for ordering from JamesPatrickDunne.com! You'll find the details of your order below. If you see an error in the order, please call 310.451.8585 and ask for Kirsten Grenoble." & chr(13) & chr(13) & "Thanks again and we hope you enjoy James' music." & chr(13) & chr(13) & "__________________________________________________" & chr(13) & chr(13) & sBody
objMail.To=trim(Request.Form("From") )
objMail.Bcc="kgrenoble@communicationcenter.com"
objMail.Subject="James Patrick Dunne Order Form"
objMail.Send
set objMail = nothing
response.write "" & "" & "
" & "" & "Thank you for ordering!" & "
" & "Your order confirmation is below. Please print this screen for your records. You will also be recieving an email detailing your order." & "" & "" & "" & "" & ""
response.write fBody
else%> |
|
> |
