<% If Request.Form.Count > 0 Then 'Form data has been received... Dim strStatus If request.form("email_address") = "" THEN Response.Write "email_address: " + request.form("email_address") 'The form was not entered correctly Response.redirect ("emailtest/re_submit.html") response.end STOP END IF If SendForm(strStatus) Then 'The form was emailled successfully Response.redirect ("emailtest/done.html") response.end STOP Else 'There was a problem sending the form Response.Write "The form couldn't be sent, the reason is:
" Response.Write strStatus End If Else 'No form received - display the form %> Premier Minibuses quotation form
home button vehicles button button quotation button contact
Airports Schools Days Out Race Days Theatres Nightclubs

Quotation

Premier Minibuses was set up with the view to provide a professional
service with courteous drivers who are fully uniformed.
Date Required
 *
No of people::
*
Pick up time:
* : :
Pick up address:
*
City:
*  Postcode:   
Country:
*
Going to venue:
*
Return time:
* : :
Drop off:
*
Customer name:
*
Address:
*
City:
*  Postcode:
Country:
*  Tel:  
Email:
*
*

        

* Required fields

t:01992 800549 minibus4u@btinternet.com Follow us on Facebook
www.blackbirddesign.co.uk
<% End If %>