<% ' FP_ASP ASP Automatically generated by a FrontPage Component. Do not Edit. On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 1252 Err.Clear strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "Cannot create connection" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "Cannot create record set" fp_conn.Open Application("Database1_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open "tblMain", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "Cannot open record set" fp_rs.AddNew FP_DumpError strErrorUrl, "Cannot add new record set to the database" Dim arFormFields0(21) Dim arFormDBFields0(21) Dim arFormValues0(21) arFormFields0(0) = "lead_first_name" arFormDBFields0(0) = "lead_first_name" arFormValues0(0) = Request("lead_first_name") arFormFields0(1) = "lead_job_type" arFormDBFields0(1) = "lead_job_type" arFormValues0(1) = Request("lead_job_type") arFormFields0(2) = "lead_service1b" arFormDBFields0(2) = "Faucet/Fixture" arFormValues0(2) = Request("lead_service1b") arFormFields0(3) = "lead_service1c" arFormDBFields0(3) = "Shower/Tub" arFormValues0(3) = Request("lead_service1c") arFormFields0(4) = "lead_terms" arFormDBFields0(4) = "lead_terms" arFormValues0(4) = Request("lead_terms") arFormFields0(5) = "lead_service1d" arFormDBFields0(5) = "BrokenPipe" arFormValues0(5) = Request("lead_service1d") arFormFields0(6) = "lead_service1e" arFormDBFields0(6) = "Sewer/Drain" arFormValues0(6) = Request("lead_service1e") arFormFields0(7) = "lead_service1" arFormDBFields0(7) = "Backflow Testing" arFormValues0(7) = Request("lead_service1") arFormFields0(8) = "lead_service1f" arFormDBFields0(8) = "Sink/Disosal" arFormValues0(8) = Request("lead_service1f") arFormFields0(9) = "uri" arFormDBFields0(9) = "uri" arFormValues0(9) = Request("uri") arFormFields0(10) = "lead_service3" arFormDBFields0(10) = "lead_service3" arFormValues0(10) = Request("lead_service3") arFormFields0(11) = "lead_service1g" arFormDBFields0(11) = "lead_service1g" arFormValues0(11) = Request("lead_service1g") arFormFields0(12) = "lead_last_name" arFormDBFields0(12) = "lead_last_name" arFormValues0(12) = Request("lead_last_name") arFormFields0(13) = "lead_service1h" arFormDBFields0(13) = "lead_service1h" arFormValues0(13) = Request("lead_service1h") arFormFields0(14) = "lead_service1i" arFormDBFields0(14) = "lead_service1i" arFormValues0(14) = Request("lead_service1i") arFormFields0(15) = "site" arFormDBFields0(15) = "site" arFormValues0(15) = Request("site") arFormFields0(16) = "lead_service1j" arFormDBFields0(16) = "lead_service1j" arFormValues0(16) = Request("lead_service1j") arFormFields0(17) = "lead_email" arFormDBFields0(17) = "lead_email" arFormValues0(17) = Request("lead_email") arFormFields0(18) = "lead_phone" arFormDBFields0(18) = "lead_phone" arFormValues0(18) = Request("lead_phone") arFormFields0(19) = "lead_notes" arFormDBFields0(19) = "lead_notes" arFormValues0(19) = Request("lead_notes") arFormFields0(20) = "lead_zip" arFormDBFields0(20) = "lead_zip" arFormValues0(20) = Request("lead_zip") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type" End If If Request.ServerVariables("REMOTE_HOST") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name" End If FP_SaveFieldToDB fp_rs, Now, "Timestamp" If Request.ServerVariables("REMOTE_USER") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name" End If fp_rs.Update FP_DumpError strErrorUrl, "Cannot update the database" fp_rs.Close fp_conn.Close FP_FormConfirmation "text/html; charset=windows-1252",_ "Form Confirmation",_ "Thank you for submitting the following information:",_ "index.html",_ "Return to the form." End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> 321 Plumbing

Contact     |     Site Map     

321 Plumbing & The Space Coast

321 Plumber Fixing a Pipe

321 Plumbing technicians are on-call 24 hours a day, 7 days a week, 365 days a year to repair your home plumbing systems in any situation. Emergency water restoration is also a specialty, with quick, thorough and cost-effective recovery — 321 Plumbing will help get your life back to normal!.

Professional 321 Plumbing Customer care agents will answer your call 24/7 and dispatch a licensed plumber, service technician or water restoration crew as quickly as possible.!

Contact 321 Plumbing 24/7:

(321) 728-2888

List of Services:

  
Residential Plumbing

If you need professional, licensed and insured plumbing experts, 321 Plumbing can help you resolve your plumbing issue quickly and effectively.

The Space Coast Plumbing Company
1. What can we help with?
Sewer / Drain Faucet / Fixture
Sink / Disposal Toilet
Shower / Tub Water Heater
Broken Pipe Water Damage
Backflow Testing Backflow Repair

Tell us more about what you need:

Project Type:
 
2. Contact Information
*First Name:
*Last Name:
 Email:
*Zip Code:
*Phone:
Contact time:
I have read and agree to the terms and recommendations.*

We are proud to support:

 

State of Florida Registration Numbers QB59626, CFC1427622

  321 Plumbing  © Copyright 2006.
321 Plumbing, Inc. makes no guarantee as to the accuracy of any information contained on this website, nor the quality of the service or product received from any person, company, or business who uses any of our advertising services or websites. We do not accept any liability, express or implied, from the use of our clients products or services. We urge you, as a consumer, to perform your own due diligence in selecting a company to provide any work or products. If you have any concerns or questions, please see our terms of service.

Privacy Policy   |   Terms Of Service