<%@ LANGUAGE="VBScript" %> New Page 1 <% Dim strDate(12) Pos = 1 For AddDate = 1 to 14 If WeekDayName(WeekDay(Date + AddDate)) <> "Sunday" then strDate(Pos) = WeekDayName(WeekDay(Date + AddDate)) + ", " + MonthName(Month(Date + AddDate)) + " " + CStr(Day(Date+AddDate)) + ", " + CStr(Year(Date+AddDate)):Pos = Pos +1 Next %>

On-Line Vehicle Service Appointment Request
* Items are required
Vehicle Information
* Manufacturer:
* Year:
* Model:
   Miles:
   VIN Number:
Service Information
* Type of Service Needed:
* Preferred Appointment Time:
* Alternate Appointment Time:

Contact Information
* Name:
* E-mail:
* Home Phone: * Day Phone:
   Fax:    Preferred Contact:
* Address:
   City:
   State:    Zip:
Comments: