<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim strCounty, strMark Dim rsLawyers Dim rsLawyers_numRows Dim strSearchTableContent Dim strServiceList, strCurrCounty, strNextCty, aryServiceList, blnServiceFound strSearchTableContent = "

Please use the Map to select a county for your search area, or use the Advanced Search if you are seeking a particular Service in your area.

" if (Request("cmdSearch") = "Search") then strWhereCounty = "" strMark = "" strRequestedServices = "" strSearchTableContent = "" blnServiceFound = False blnShowResultsTab = False blnMapSearch = False if (Request.Form("search_area") <> "") then strCounty = Request("search_area") strRequestedServices = Request.Form("services") strCountyString = Replace(strCounty,",","','") strWhereCounty = "WHERE County IN ('" & strCountyString & "')" blnShowResultsTab = True end if if (( Request.QueryString("county") <> "" ) OR ( Request.Form("selected_area") <> "" )) then strCounty = Request.Form("selected_area") if(Request.QueryString("county") <> "" ) then strCounty = Request.QueryString("county") end if strCountyString = Replace(strCounty,",","','") strWhereCounty = "WHERE County IN ('" & strCountyString & "')" blnShowResultsTab = True blnMapSearch = True blnServiceFound = True end if Set rsLawyers = Server.CreateObject("ADODB.Recordset") rsLawyers.ActiveConnection = MM_GA_STRING rsLawyers.Source = "SELECT ID, ContactName, CompanyName, Address1, Address2, Town, County, PostCode, TelNo, Website, EmailAdd, free_interview, ServiceInfo FROM dbo.GA_LawyersList " & strWhereCounty & " ORDER BY Town, CompanyName ASC" rsLawyers.CursorType = 0 rsLawyers.CursorLocation = 2 rsLawyers.LockType = 1 rsLawyers.Open() rsLawyers_numRows = 0 strServiceList = "" strTableStart = "" strTableEnd = "
Services
" strCurrCounty = "aa" strNextCty = "" aryServiceList = "" strSearchTableContent = "" strSearchTable = "" strSearchTableCounty = "" iLawyerCount = 0 strServiceStyle = "" strLawyerStyle = "" if (NOT rsLawyers.BOF) then Do While ( NOT rsLawyers.EOF ) aryServiceList = "" strServiceListing = "" strServiceList = "" strServiceStyle = "style='display:none;'" strLawyerID = rsLawyers.Fields.Item("ID").Value strNextCty = rsLawyers.Fields.Item("County").Value if NOT(blnMapSearch) then strServiceList = rsLawyers.Fields.Item("ServiceInfo").Value if (strServiceList <> "" ) then aryServiceList = Split(strServiceList, ",") end if iPos = 0 iPosTotal = 0 if IsArray(aryServiceList) then for sl = 0 to UBound(aryServiceList) - 3 strCurrService = Trim(aryServiceList(sl)) iPos = InStr(strRequestedServices,strCurrService) iPosTotal = iPosTotal + iPos strCurrService = aryServiceList(sl) if listofservices.Exists(strCurrService)= true then strCurrService = listofservices.item(strCurrService) end if strCurrServiceName = aryServiceList(sl + 1) strCurrServiceTel = aryServiceList(sl + 2) strCurrServiceEmail = aryServiceList(sl + 3) if (strCurrServiceName = "x" ) then strCurrServiceName = "
Contact: see details on left" else strCurrServiceName = "
Contact: " & strCurrServiceName end if if (strCurrServiceTel = "x" ) then strCurrServiceTel = "" else strCurrServiceTel = "
T: " & strCurrServiceTel end if if (strCurrServiceEmail = "x" ) then strCurrServiceEmail = "" else strCurrServiceEmail = "
E: " & strCurrServiceEmail & "" end if strServiceListing = strServiceListing & "" & strCurrService & "" & strCurrServiceName & strCurrServiceTel & strCurrServiceEmail & "" sl = sl + 3 next else strServiceListing = " " end if if (iPosTotal > 0 ) then strLawyerStyle = "style='display:block;'" strServiceStyle = "style='display:block;'" blnServiceFound=True else strLawyerStyle = "style='display:none;'" strServiceStyle = "style='display:none;'" end if end if iLawyerCount = iLawyerCount + 1 strSearchTableContent = strSearchTableContent & "
" if ( strNextCty <> strCurrCounty ) then strNext = "" else strNext = "" end if strSearchTableCounty = "" blnFreeInterview = rsLawyers.Fields.Item("free_interview") if ( blnFreeInterview = "0" ) then strMark = "*" else strMark = "" end if strSearchTableContent = strSearchTableContent & strNext & "" strSearchTableContent = strSearchTableContent & "" strSearchTableContent = strSearchTableContent & "
" & strNextCty & "
" & strNextCty & "
" & rsLawyers.Fields.Item("CompanyName").Value & "  " & strMark & "

" strSearchTableContent = strSearchTableContent & rsLawyers.Fields.Item("Address1").Value & "
" strSearchTableContent = strSearchTableContent & rsLawyers.Fields.Item("Address2").Value & "
" strSearchTableContent = strSearchTableContent & rsLawyers.Fields.Item("Town").Value & "
" strSearchTableContent = strSearchTableContent & rsLawyers.Fields.Item("County").Value & "
" strSearchTableContent = strSearchTableContent & rsLawyers.Fields.Item("PostCode").Value & "

" strSearchTableContent = strSearchTableContent & "Contact: " & rsLawyers.Fields.Item("ContactName").Value & "
" strSearchTableContent = strSearchTableContent & "Tel: " & rsLawyers.Fields.Item("TelNo").Value & "
" strSearchTableContent = strSearchTableContent & "Website:
" & rsLawyers.Fields.Item("Website").Value & "
" strSearchTableContent = strSearchTableContent & "Email:
"& rsLawyers.Fields.Item("EmailAdd").Value & "
" strSearchTableContent = strSearchTableContent & "
" & strTableStart & strServiceListing & strTableEnd & "
" strCurrCounty = strNextCty rsLawyers.MoveNext() Loop if NOT(blnServiceFound) then strSearchTableContent = "
" & strSearchTableCounty & "
We are Sorry but we do not have any Lawyers registered as providing your selected service(s) in this area yet.

However we do have " & iLawyerCount & " lawyers listed for this area. It may be that one of these lawyers offers the service you are looking for but as yet they have not informed us. Click here if you would like to view this list.

If you are a Lawyer in the " & strCounty & " area and would like to be listed here, please contact us for details.
" end if else strSearchTableContent = strSearchTableContent & "
Sorry. We do not have any Lawyers listed for this area yet.
If you are a Lawyer in the " & strCounty & " area and would like to be listed here, please contact us for details.
" end if end if strSearchTable = strSearchTableContent Set listofservices = Nothing %> The GrandParents' Association - The Lawyers' List
 
     
 
The Grandparents' Association <%if(blnLoggedIn) then%>Welcome <%=strUserName%> | <%else%>
 
Grandparents' Association hands
 
  Home About Us Resources Services How Can I Help? Contact Us Join Now
 
 
The Lawyers' List
Information

The lawyers and firms listed are on the Law Society's Children Panel and the Family Panel lists and have the necessary expertise to deal with cases involving children, grandparents or other family members who may consult them. The Law Society is the regulatory and representative body for approximately 116,000 solicitors in England and Wales. All solicitors on The Grandparents' Association list are on either the Children Panel or the Family Panel of solicitors.

The Children Panel consists of solicitors who deal with law that relates to public law Children Act proceedings such as applications for care orders by local authority social services departments, private law Children Act proceedings such as applications about the place of residence of or contact with children, and adoption.

The Family Panel deals with Family law, which covers all areas of law relating to relationships with partners, cohabitants (either same sex or opposite sex) and married couples. It deals with issues relating to the beginning and end of a relationship (e.g. marriage, divorce etc). They also deal with the law on relationship breakdown, divorce, capital and income settlements, and cases relating to private children law. They are also able to offer help to those suffering domestic violence.

The majority also offer a free initial consultation to our members requiring family services, so become a member now and take advantage of their expertise and advice. (Those not offering a free initial interview are marked with a * )

The Grandparents' Association is now able to offer visitors to our website the additional facility to search our database of excellent family lawyers to find out what other services they can provide. Go to Advanced Search and click on the service you are looking for, please note that these services are available to all but do not offer a free initial interview.

Map Search
Click on a county on the map to filter the results for that area.

Advanced Search
Tick the services you are interested in and select your area to filter the list to only include those lawyers that offer the services you are looking for.

Results
Displays the list of lawyers based on your search criteria.

Map Search

Click on a county to filter the Lawyers' List in the Results Tab.

Norfolk Cambridgeshire Suffolk Essex Kent East Sussex West Sussex Surrey Isle of Wight Hampshire Bedfordshire Hertfordshire Greater London Cornwall Devon Dorset Somerset Avon Wiltshire Berkshire Buckinghamshire Oxfordshire Gloucestershire Herefordshire Worcestershire Warwickshire Northamptonshire Leicestershire Lincolnshire / Rutland Nottinghamshire East Riding North Yorkshire West Midlands Staffordshire Shropshire Cheshire Derbyshire South Yorkshire West Yorkshire Greater Manchester Lancashire Cumbria Co. Durham Tyne & Wear Northumberland Teeside Merseyside Monmouthshire Glamorgan Camarthenshire / Pembrokeshire / Cardiganshire Anglesey(Sir Fon) Caernarfonshire / Merioneth Denbighshire / Flintshire Montogmeryshire / Radnorshire / Brecknockshire Co Down Co Antrim Co Londonderry Co Tyrone Co Armagh Co Fermanagh Caithness / Inverness-shire / Nairnshire / Ross & Cromaty / Sutherland Aberdeenshire / Banffshire / Kincardineshire / Moray / Orkney / Shetland Angus / Perthshire Clackmannanshire / Fife / Kinross-shire Dumbartonshire / Stirlingshire Argyllshire Buteshire Ayrshire / Lanarkshire / Renfrewshire Dumfriesshire / Kirkcudbrightshire / Wigtownshire East Lothian / Midlothian / West Lothian Berwickshire / Peeblesshire / Roxburghshire / Selkirkshire
Advanced Search
Please choose the services you are interested in and your area, then click 'Search'.
<%=strOptionBoxes%>


Search Results
<%=strSearchTable%>
 
Terms & Conditions | Privacy Policy                                                              © The Grandparents Association Company Limited by Guarantee
Registered in England No. 5204434
Registered Charity No. 1105977