| Contact
Information: |
|
| * Company Name: | |
| * Contact Name: | |
| * Email Address: | |
| * Telephone: | |
| Fax: | |
| * Address: | |
| * Zip Code: | |
| Best time to call: |
| Commercial
Quote Information |
|
| * Expiration Month: | |
| Current Carrier: | |
| Questions or Concerns: | |
<% End Sub %> <% If Request.ServerVariables("REQUEST_METHOD") = "POST" Then strCompanyName = Request.Form("companyname") strName = Request.Form("name") strEmail = Request.Form("email") strTelephone = Request.Form("telephone") strFax = Request.Form("fax") strAddress = Request.Form("address") strZipCode = Request.Form("zipcode") strBestTimeToCall = Request.Form("besttimetocall") strExpirationMonth = Request.Form("expirationmonth") strCurrentCarrier = Request.Form("currentcarrier") strQuestionsConcerns = Request.Form("questionsconcerns") If (strCompanyName <> "") And (strName <> "") And (strEmail <> "") And (strTelephone <> "") And _ (strFax <> "") And (strAddress <> "") And (strZipCode <> "") And (strBestTimeToCall <> "") And _ (strExpirationMonth <> "") And (strCurrentCarrier <> "") Then %> <% Call CommercialQuoteForm End If Else Call CommercialQuoteForm End If %>