% ' 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("CPKLaw2.0_ConnectionString") FP_DumpError strErrorUrl, "Cannot open database" fp_rs.Open """Client Intake Profile""", 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(51) Dim arFormDBFields0(51) Dim arFormValues0(51) arFormFields0(0) = "CaseTitle" arFormDBFields0(0) = "In Re:" arFormValues0(0) = Request("CaseTitle") arFormFields0(1) = "CzipCode" arFormDBFields0(1) = "Client's Zip Code" arFormValues0(1) = Request("CzipCode") arFormFields0(2) = "OppCnslCity" arFormDBFields0(2) = "Opposing Counsel City" arFormValues0(2) = Request("OppCnslCity") arFormFields0(3) = "OppCnslName" arFormDBFields0(3) = "Opposing Counsel's Name" arFormValues0(3) = Request("OppCnslName") arFormFields0(4) = "CircuitCourtCounty" arFormDBFields0(4) = "Court County" arFormValues0(4) = Request("CircuitCourtCounty") arFormFields0(5) = "CStreeAddress" arFormDBFields0(5) = "Client's street address" arFormValues0(5) = Request("CStreeAddress") arFormFields0(6) = "PartiesCounty" arFormDBFields0(6) = "Party's County of Residence" arFormValues0(6) = Request("PartiesCounty") arFormFields0(7) = "ClientsDebts" arFormDBFields0(7) = "Client's Debts" arFormValues0(7) = Request("ClientsDebts") arFormFields0(8) = "ClientsGoals" arFormDBFields0(8) = "What is the client's desired outcome in litigation?" arFormValues0(8) = Request("ClientsGoals") arFormFields0(9) = "Defendant" arFormDBFields0(9) = "Defendant" arFormValues0(9) = Request("Defendant") arFormFields0(10) = "ClientsOccupation" arFormDBFields0(10) = "Client's Occupation" arFormValues0(10) = Request("ClientsOccupation") arFormFields0(11) = "ClientsPager" arFormDBFields0(11) = "Client's Pager" arFormValues0(11) = Request("ClientsPager") arFormFields0(12) = "ClientsEmployerAddress" arFormDBFields0(12) = "Client's employer's address" arFormValues0(12) = Request("ClientsEmployerAddress") arFormFields0(13) = "CourtPhoneNumber" arFormDBFields0(13) = "Court phone number" arFormValues0(13) = Request("CourtPhoneNumber") arFormFields0(14) = "CourtStreetAddress" arFormDBFields0(14) = "Court street address" arFormValues0(14) = Request("CourtStreetAddress") arFormFields0(15) = "CourtZipCode" arFormDBFields0(15) = "Court zip code" arFormValues0(15) = Request("CourtZipCode") arFormFields0(16) = "subject" arFormDBFields0(16) = "subject" arFormValues0(16) = Request("subject") arFormFields0(17) = "CourtCaseNumber" arFormDBFields0(17) = "Court Case Number" arFormValues0(17) = Request("CourtCaseNumber") arFormFields0(18) = "ClientsMobile" arFormDBFields0(18) = "Client's Mobile Phone" arFormValues0(18) = Request("ClientsMobile") arFormFields0(19) = "ClientEmployerZipCode" arFormDBFields0(19) = "Client's Employer's Zip Code" arFormValues0(19) = Request("ClientEmployerZipCode") arFormFields0(20) = "ClientsDriversNumber" arFormDBFields0(20) = "Client's Driver's License Number" arFormValues0(20) = Request("ClientsDriversNumber") arFormFields0(21) = "ClientsBirthDate" arFormDBFields0(21) = "Client's date of birth" arFormValues0(21) = Request("ClientsBirthDate") arFormFields0(22) = "ClientsWorkPhone" arFormDBFields0(22) = "Client's work phone" arFormValues0(22) = Request("ClientsWorkPhone") arFormFields0(23) = "ClientsAssets" arFormDBFields0(23) = "Client's Assets" arFormValues0(23) = Request("ClientsAssets") arFormFields0(24) = "AdverseState" arFormDBFields0(24) = "Adverse Party state" arFormValues0(24) = Request("AdverseState") arFormFields0(25) = "AdverseFname" arFormDBFields0(25) = "Adverse Party Name" arFormValues0(25) = Request("AdverseFname") arFormFields0(26) = "PartiesCurrentResidence" arFormDBFields0(26) = "Party's Place of Residence" arFormValues0(26) = Request("PartiesCurrentResidence") arFormFields0(27) = "ClientEmployerState" arFormDBFields0(27) = "Client's Employer's State" arFormValues0(27) = Request("ClientEmployerState") arFormFields0(28) = "OppCnslPhone" arFormDBFields0(28) = "Opposing Counsel's Phone Number" arFormValues0(28) = Request("OppCnslPhone") arFormFields0(29) = "CourtCity" arFormDBFields0(29) = "Court city" arFormValues0(29) = Request("CourtCity") arFormFields0(30) = "ClientFax" arFormDBFields0(30) = "Client's Fax" arFormValues0(30) = Request("ClientFax") arFormFields0(31) = "SocialSecNumber" arFormDBFields0(31) = "Client's Social Security Number" arFormValues0(31) = Request("SocialSecNumber") arFormFields0(32) = "ClientEmployerCity" arFormDBFields0(32) = "Client's Employer's City" arFormValues0(32) = Request("ClientEmployerCity") arFormFields0(33) = "MonthlyMortgage" arFormDBFields0(33) = "Amount of Monthly Mortgage Payment" arFormValues0(33) = Request("MonthlyMortgage") arFormFields0(34) = "OppCnslFax" arFormDBFields0(34) = "Opposing Counsel's Fax" arFormValues0(34) = Request("OppCnslFax") arFormFields0(35) = "ClientsHomePhone" arFormDBFields0(35) = "Client's home phone" arFormValues0(35) = Request("ClientsHomePhone") arFormFields0(36) = "AdverseMailingAddress" arFormDBFields0(36) = "Adverse Party's mailing address" arFormValues0(36) = Request("AdverseMailingAddress") arFormFields0(37) = "AdverseStreetAddress" arFormDBFields0(37) = "Adverse Party street" arFormValues0(37) = Request("AdverseStreetAddress") arFormFields0(38) = "Ccity" arFormDBFields0(38) = "Client's City" arFormValues0(38) = Request("Ccity") arFormFields0(39) = "OppCnslStreet" arFormDBFields0(39) = "Opposing Counsel's Address" arFormValues0(39) = Request("OppCnslStreet") arFormFields0(40) = "Gender1" arFormDBFields0(40) = "Client's sex1" arFormValues0(40) = Request("Gender1") arFormFields0(41) = "CPoBox" arFormDBFields0(41) = "PO BOX" arFormValues0(41) = Request("CPoBox") arFormFields0(42) = "CourtState" arFormDBFields0(42) = "Court state" arFormValues0(42) = Request("CourtState") arFormFields0(43) = "Gender2" arFormDBFields0(43) = "Client's sex2" arFormValues0(43) = Request("Gender2") arFormFields0(44) = "OppCnslState" arFormDBFields0(44) = "Opposing Counsel State" arFormValues0(44) = Request("OppCnslState") arFormFields0(45) = "JudgeAssigned" arFormDBFields0(45) = "Judge Assigned to the Case" arFormValues0(45) = Request("JudgeAssigned") arFormFields0(46) = "OppCnslZip" arFormDBFields0(46) = "Opposing Counsel Zip" arFormValues0(46) = Request("OppCnslZip") arFormFields0(47) = "Cstate" arFormDBFields0(47) = "Client's State" arFormValues0(47) = Request("Cstate") arFormFields0(48) = "AdverseZipCode" arFormDBFields0(48) = "Adverse Party zip code" arFormValues0(48) = Request("AdverseZipCode") arFormFields0(49) = "Plaintiff" arFormDBFields0(49) = "Plaintiff" arFormValues0(49) = Request("Plaintiff") arFormFields0(50) = "ClientsEmail" arFormDBFields0(50) = "Client's e-mail" arFormValues0(50) = Request("ClientsEmail") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 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:",_ "Client%20Intake%20Profile.htm",_ "Return to the form." End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %>
![]()
![]()
30445 Northwester Highway, Suite 230, Farmington Hills, MI 48334/248-737-8410 phone/1-866-728-4718 fax, christopherkohler@kohlerlaw.net
Please take the time to complete this form in its entirety. If the particular question asked doesn't apply to you, then simply enter "not applicable". Also, you must complete this form in one sitting. Otherwise, the form will reset, and you will have to begin again. Some of the information requested here you have already provided, either during our initial office visit, or in other parts of the form. I need you to provide the information again nonetheless. I apologize for the redundancy, but you are still saving time and money by giving it to me over the internet. Also, I need you to be as descriptive as possible. At this stage there is no such thing as too much information. Dates, specific events, and other witnesses to said events are especially helpful. As always, should you have any questions, comments or concerns, please don't hesitate to contact me. Office number: 248-737-8410.
|
|||||