<%@LANGUAGE="VBSCRIPT"%> <% Dim Recordset1__MMid Recordset1__MMid = "0" If (Request.querystring("id") <> "") Then Recordset1__MMid = Request.querystring("id") Recordset1__MMid = replace(Recordset1__MMid,"'","") Recordset1__MMid = replace(Recordset1__MMid,"--","") Recordset1__MMid = replace(Recordset1__MMid,"%","") Recordset1__MMid = replace(Recordset1__MMid,":","") End If %> <% Dim Recordset1 Dim Recordset1_cmd Dim Recordset1_numRows Set Recordset1_cmd = Server.CreateObject ("ADODB.Command") Recordset1_cmd.ActiveConnection = MM_GIDataSource_String Recordset1_cmd.CommandText = "SELECT * FROM dbo.Listings WHERE (active='y' or active='Y') and county like ? and type like '%C%' ORDER BY sponsored desc, Companyname" Recordset1_cmd.Prepared = true Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param1", 200, 1, 255, "%" + Recordset1__MMid + "%") ' adVarChar Set Recordset1 = Recordset1_cmd.Execute Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> Driving Lessons <%=Recordset1__MMid %> : ADI Driving Lessons <%=Recordset1__MMid%> : Driving Schools <%=Recordset1__MMid%> : <%=Recordset1__MMid%> ADI Instructors

 

ADI DRIVING LESSONS - Irish Directory of Approved ADI Driving Schools and Instructors in <%=Recordset1__MMid %>

Driving Lessons for <%=Recordset1__MMid %>

ADI Driving Lessons

Find Driving Lessons in <%=Recordset1__MMid %>

All instructors rolex replica sale listed here are RSA ADI approved and rolex replica sale ready to provide beginner, refresher, advanced or pre-test lessons to you. We only list professional ADIs that are committed to providing excellent driver replica watches uk training.

Always ask to see your Instructors ADI ID before accepting lessons.

listing appears on top Join our list

<% if session("access")="fine" then %> Add Entry <% end if %> <% If Recordset1.EOF And Recordset1.BOF Then %>

No Instructors in this area yet - Interested in appearing here

<% End If ' end Recordset1.EOF And Recordset1.BOF %> <% If Not Recordset1.EOF Or Not Recordset1.BOF Then %> <% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) web = replace((Recordset1.Fields.Item("Website").Value),"http://","") spons = (Recordset1.Fields.Item("sponsored").Value) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %>

<% if web<>"" then %> " target="_blank" rel="nofollow" class="" onclick="javascript:pageTracker._trackPageview('/Exit-Links/<%=(Recordset1.Fields.Item("website").Value)%>');"><%=(Recordset1.Fields.Item("Companyname").Value)%> <% else %> <%=(Recordset1.Fields.Item("Companyname").Value)%> <% end if %>

ADI No. :  <%=(Recordset1.Fields.Item("ADINo").Value)%>

<% if spons =3 or spons=4 then %>

<% end if %> <% if spons>4 then %>
&width=250&api=2JQMV66H5LQUxWzLh9WVHFXJcp" />

<% end if %>
Mobile: <%=(Recordset1.Fields.Item("Mobile").Value)%>    
Tel: <%=(Recordset1.Fields.Item("Tel").Value)%>    
Email: 
Areas: <%=(Recordset1.Fields.Item("PrimaryAreas").Value)%>
<% if web<>"" then %> " target="_blank" rel="nofollow" class="websnapr" onclick="javascript:pageTracker._trackPageview('/Exit-Links/<%=(Recordset1.Fields.Item("website").Value)%>');" >Website <% end if %><% if session("access")="fine" then %>
">Edit <%=(Recordset1.Fields.Item("PrimaryAreas").Value)%> <% end if %>
 
<% End If ' end Not Recordset1.EOF Or NOT Recordset1.BOF %>

ADI Driving Lessons Ireland      About Us | Site Map | Privacy Policy | Contact Us | ©2009 Road Ready Limited
Web Design Dublin

<% Recordset1.Close() Set Recordset1 = Nothing %>