<% 'dim save_var = request.querystring("save"); 'if save_var == "y" then dim bool_save bool_save=Request.QueryString("save") If bool_save <> "y" Then ' Response.Write("Hello " & bool_save & "!
") 'Response.Write("How are you today?") %>

<% End If %> <% 'dim bool_save 'bool_save=Request.QueryString("save") 'If bool_save = "y" Then if(Request.QueryString("save") = "y") Then response.write("Thank you for your query. Your email has been received and will be responded to shortly.") Set myMail=CreateObject("CDO.Message") myMail.Subject="Trade Depot Customer Enquiry" myMail.From= request.form("email") myMail.To="nathan.klu@rlagroup.co.uk;kat@rlagroup.co.uk;Jodie.Fox@Trade-Depot.co.uk;laura.blyth@trade-depot.co.uk;DaveA@rlagroup.co.uk;" myMail.HTMLBody = "" & _ "

Trade Depot Customer Enquiry.

" _ &"" _ &"" _ &"" _ &""_ &"" _ &"" _ &"

Name:	"&request.form("cust_name")& "
Address:	"&request.form("address") & "
Postcode:	"&request.form("postcode") & "
Tel:	"&request.form("tel") & "
Trade or Retail:	"&request.form("trade_retail") & "
Local Store:	"&request.form("local_store") & "
Query:	"&request.form("query") & "

" myMail.Send set myMail=nothing 'Set myMail=CreateObject("CDO.Message") 'myMail.Subject="Sending email with CDO" 'myMail.From="info@trade-depot.co.uk" 'myMail.To="sean.myers@rlagroup.co.uk" 'myMail.HTMLBody = "

This is a message.

" 'myMail.Send 'set myMail=nothing End If %>

Site Map

Disclaimer

Accessibility