<% if Request.Querystring("isSubmitted") = "yes" then if Request.Querystring("Name") <> "" and Request.Querystring("Telephone") <> "" then Dim namevar, telephonevar, interestvar, emailvar, commentvar, confirmation Dim objCDO namevar = Request.Querystring("Name") Addressvar = Request.Querystring("Address") statevar = Request.Querystring("state") zipcodevar = Request.Querystring("zipcode") cityvar = Request.Querystring("city") interested1var = Request.Querystring("Interest1") interested2var = Request.Querystring("Interest2") interested3var = Request.Querystring("Interest3") telephonevar = Request.Querystring("Telephone") emailvar = Request.QueryString("Email") commentvar = Request.Querystring("Comments") Companyvar = Request.Querystring("Company") needs1var = Request.Querystring("Needs1") needs2var = Request.Querystring("Needs2") needs3var = Request.Querystring("Needs3") Set objCDO = Server.CreateObject("CDONTS.NewMail") objCDO.From = "request@allyearcleaning.com" objCDO.To = "frank@allyearcleaning.com" objCDO.Cc = "" objCDO.Subject = "All Year Cleaning Contact Us Form" objCDO.Body = "Name: " & namevar & "
Company: " & Companyvar & "
Address: " & Addressvar & " - " & cityvar & " , " & Statevar & " " & ZipCodevar & "
Phone: " & telephonevar & "
E-Mail: " & emailvar & "
Interested In: " & Interested1var & " , " & Interested2var & " , " & Interested3var & "
Needs: " & needs1var & " , " & needs2var & " , " & needs3var & "

Comment:
" & commentvar objCDO.BodyFormat = 0 objCDO.MailFormat = 0 'confirmation objCDO.Bcc = "frank@optimumisp.com" objCDO.Send ConfirmMsg = "Thanks for submitting your information!" else ConfirmMsg = "  You have to fill Name and Telephone information" end if end if %> All Year Cleaning - Contact Us

Contact Us

Please feel free to contact us with
questions, comments, or to request a free consultation and quotation.

Top of Form

Name:

*

Phone Number:

*

Company:

Address:

City:

State:

Zip code:

Email Address:

 

I am interested in:
check all that apply

General estimate by phone
Have a representative visit my office
Comparison quote

 

My office needs:
check all that apply

a post-renovation clean-up
general office cleaning
 other services - please describe below

 

Message to us:

<% if ConfirmMsg <> "" then %>

<%= ConfirmMsg %>

<% end if %>
Contact Information:

Telephone
                                     973-457-5470 Frank Malone General Operations Manager
Teodosia Prechesniuki Quality Control Manager
Cristiani Preciosa Quality Control Manager
FAX
                                     973-881-9594

Address
                                     227 Harrison Ave
Harrison, NJ 07029


E-mail
                                     General Information:info@allyearcleaning.com
© 2000-2005 All Year Cleaning Corp.
All rights Reserved.
 Home • Contact Us • Site Map