|
|
<%
if request.form ("YourEMailAddress") ="" then
%>
Common Delivery Points
<%
else
Dim myMail
Dim HTML
Set myMail = CreateObject("CDONTS.NewMail")
Html = Html & ""
Html = Html & ""
Html = Html & ""
Html = Html & ""
Html = Html & " "
html = html & "Company name: "& request.form("compay_name") &" Acct. # "& request.form("Account_Number") &" "
html = html & "Phone number: "& request.form("Phone_Number") &"Fax "
html = html & "number: "& request.form("Fax_Number") &"
"
html = html & "List of locations where you "
html = html & "frequently send deliveries: "
html = html & " "
html = html & "Company: "& request.form("First_Company") &" "
html = html & "Street Address: "& request.form("First_Company_Street_Address") &" "
html = html & "Suite number: "& request.form("First_Company_Suite_Number") &" "
html = html & "City: "& request.form("First_Company_City") &" St. "& request.form("First_Company_State") &" Zip: "& request.form("First_Company_Zip_Code") &" "
html = html & "Phone number: (with area code) "
html = html & ""& request.form("First_Company_Phone_Number") &" "
html = html & " "
html = html & "Company: "& request.form("Second_Company") &" "
html = html & "Street address: "& request.form("Second_Company_Street_Address") &" "
html = html & "Suite number: "& request.form("Second_Company_Suite_Number") &" "
html = html & "City: "& request.form("Second_Company_City") &" "
html = html & "St. "
html = html & ""& request.form("Second_Company_State") &" "
html = html & "Zip: "
html = html & ""& request.form("Second_Company_Zip_Code") &" "
html = html & "Phone number (with area code) "
html = html & ""& request.form("Second_Company_Phone_Number") &" "
html = html & " "
html = html & "Company: "& request.form("Third_Company") &" "
html = html & "Street address: "& request.form("Third_Company_Street_Address") &" "
html = html & "Suite number: "& request.form("Third_Company_Suite_Number") &" "
html = html & "City: "& request.form("Third_Company_City") &" "
html = html & "St. "
html = html & ""& request.form("Third_Company_State") &" "
html = html & "Zip: "
html = html & ""& request.form("Third_Company_Zip_Code") &" "
html = html & "Phone number (with area code) "
html = html & ""& request.form("Third_Company_Phone_Number") &" "
html = html & " "
myMail.From=request.form("YourEMailAddress")
myMail.To="operations@enacouriers.com" 'operations@enacouriers.com
myMail.Subject="Common Delivery Point Form"
myMail.BodyFormat=0
myMail.MailFormat=0
myMail.Body=HTML
myMail.Send
set mymail=nothing
%>
Thanks you for
giving your Information
Return to
home page.
<%
end if
%>
|
|