Roof / Siding / Window / Deck & more Service Request Form

<% dim lError dim lErrArr dim lClientName dim lAddress dim lCity dim lHomePhone dim lComment dim lEmail lError = request("Error") 'If errors were found trying to update if (lError <> "") then lErrArr = split(Session("Error"),"|$|") end if %> Roof / Siding / Window / Deck & more Service Request Form

R OOF / S IDING / W INDOW / D ECK & more
S ERVICE R EQUEST F ORM

Please Provide the Following Information:
* Indicates required field

<% '******************************************************************************************** ' Display the Error messages to the user '******************************************************************************************** If lError <> "" Then %>

<% 'Display Required Field Error Messages if instr(lError, "00") > 0 then %> Name is required
<% End If if instr(lError, "01") > 0 then %> Address is required
<% End If if instr(lError, "02") > 0 then %> City is required
<% End If if instr(lError, "03") > 0 then %> Home Phone is required
<% End If if instr(lError, "04") > 0 then %> Description is required
<% End If if instr(lError, "05") > 0 then %> A valid Email Address is required
<% End If %>

<% End If %>

Name*

Project Address*

City*

State

Zip

Home Phone*

Work Phone

E-mail*

What type of work do you wish to have done?

Other:

Preferred Appointment Time:*

Service Needed / Problem Description:*

Name*
Project Address*
City*
State
Zip
Home Phone*
Work Phone
E-mail*