<% Dim States_with_coaches Dim States_with_coaches_numRows Set States_with_coaches = Server.CreateObject("ADODB.Recordset") States_with_coaches.ActiveConnection = rfdb1 States_with_coaches.Source = "SELECT * FROM rf_states_with_coaches" States_with_coaches.CursorType = 0 States_with_coaches.CursorLocation = 2 States_with_coaches.LockType = 1 States_with_coaches.Open() States_with_coaches_numRows = 0 %> <% Dim Coaches_by_State__MMColParam Coaches_by_State__MMColParam = "1" If (Request.QueryString("state") <> "") Then Coaches_by_State__MMColParam = Request.QueryString("state") End If %> <% Dim Coaches_by_State Dim Coaches_by_State_numRows Set Coaches_by_State = Server.CreateObject("ADODB.Recordset") Coaches_by_State.ActiveConnection = rfdb1 Coaches_by_State.Source = "SELECT * FROM RF_coaches_by_state WHERE state = '" + Replace(Coaches_by_State__MMColParam, "'", "''") + "'" Coaches_by_State.CursorType = 0 Coaches_by_State.CursorLocation = 2 Coaches_by_State.LockType = 1 Coaches_by_State.Open() Coaches_by_State_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 States_with_coaches_numRows = States_with_coaches_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 Coaches_by_State_numRows = Coaches_by_State_numRows + Repeat2__numRows %> Radical Forgiveness.com- Forgiveness, forgive and empowerment Radical Forgiveness

 

<%server.execute("/navbarsnew/rftopmenu.asp")%>
<%server.execute("/navbarsnew/toplinks.asp")%>

Click on the country name to view coaches in these countries:

- Australia - Canada - Finland - Ireland -

Click on the state name to view coaches in these states:

<% While (NOT States_with_coaches.EOF) %> #first"><%=(States_with_coaches.Fields.Item("State").Value)%>   -    <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 States_with_coaches.MoveNext() Wend %>

<%if request("state") <> "" then%>

<%=(Coaches_by_State.Fields.Item("StateName").Value)%>

<% While ((Repeat2__numRows <> 0) AND (NOT Coaches_by_State.EOF)) %> <%if (Coaches_by_State.Fields.Item("website").Value) <> "" Then%> <%end if%>

<%if Coaches_by_State.Fields.Item("photo").Value <> "" then %> " alt="<%=(Coaches_by_State.Fields.Item("first").Value)%>' Photo" name="photo" width="111" border="2" id="photo" /> <%end if%>

<%=(Coaches_by_State.Fields.Item("first").Value)%>  <%=(Coaches_by_State.Fields.Item("last").Value)%>

Area Served: 

 <%=(Coaches_by_State.Fields.Item("area_served").Value)%>

Phone: 

<%=(Coaches_by_State.Fields.Item("phone").Value)%>

Email: 

"><%=(Coaches_by_State.Fields.Item("email").Value)%>

Website: 

" target="_blank"><%=(Coaches_by_State.Fields.Item("website").Value)%>

 <%=(Coaches_by_State.Fields.Item("bio").Value)%>

<%if (Coaches_by_State.Fields.Item("personal_statement").Value) <> "" Then%>

    Personal Statement:

<%=(Coaches_by_State.Fields.Item("personal_statement").Value)%>
<%end if%>



<% Repeat2__index=Repeat2__index+1 Repeat2__numRows=Repeat2__numRows-1 Coaches_by_State.MoveNext() Wend %> <%end if%>

Ireland

Helen Mc Crarren  Helen Mc Crarren

  Area Served: Ireland
  Phone: 087 4129385
  Email: info@learntoolsthatwork.com
  Web: www.learntoolsthatwork.com

 

Helen, a certified Radical Forgiveness Therapy Practitioner, is also a professionally qualified social worker and holistic psychotherapist.  She has worked in the adult mental health service since the early 1990’s.  She believes we can make the changes we want in our lives when we find the right tools.  A good place to start is by accepting ourselves where we are today.  Radical Forgiveness works; it shows us how to make peace with both our past and present relationships.  And it offers a doorway to self-acceptance.  Helen is also trained in inner child work, Creative Journaling Expressive Arts and a variety of energy techniques such as Emotional Freedom Techniques, Tapas Acupressure Technique and Emotrance.

 

Clodagh O'Connor (I)

  Area Served: Ireland
  Phone: [353] 9829818
  Email: mothersearth@mac.com

 

<%server.execute("/navbarsnew/rffooter.asp")%>