<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% if request.form("companyname")<>"" then erro = 1 if request.form("ADINO")<>"" and request.form("companyname")<>"" and request.form("website")<>"" then erro=0 Dim MM_editAction MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit Dim MM_abortEdit MM_abortEdit = false %> <% ' IIf implementation Function MM_IIf(condition, ifTrue, ifFalse) If condition = "" Then MM_IIf = ifFalse Else MM_IIf = ifTrue End If End Function %> <% If (CStr(Request("MM_insert")) = "form2") Then If (Not MM_abortEdit) Then ' execute the insert Dim MM_editCmd Set MM_editCmd = Server.CreateObject ("ADODB.Command") MM_editCmd.ActiveConnection = MM_AdminDataSource_STRING MM_editCmd.CommandText = "INSERT INTO dbo.Listings (Companyname, ADINo, Website, Mobile, Tel, Email, imageurl, [Description], County, PrimaryAreas, sponsored, type, active) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)" MM_editCmd.Prepared = true MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 201, 1, 60, Request.Form("Companyname")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 201, 1, 10, Request.Form("ADINo")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 201, 1, 100, Request.Form("Website")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 201, 1, 50, Request.Form("Mobile")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 201, 1, 50, Request.Form("Tel")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 201, 1, 70, Request.Form("Email")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 201, 1, 100, Request.Form("imageurl")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 201, 1, 400, Request.Form("Description")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 201, 1, 300, Request.Form("County")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param10", 201, 1, 400, Request.Form("PrimaryAreas")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param11", 5, 1, -1, MM_IIF(Request.Form("sponsored"), Request.Form("sponsored"), null)) ' adDouble MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param12", 201, 1, 20, Request.Form("type")) ' adLongVarChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param13", 201, 1, 1, Request.Form("active")) ' adLongVarChar MM_editCmd.Execute MM_editCmd.ActiveConnection.Close ' append the query string to the redirect URL Dim MM_editRedirectUrl MM_editRedirectUrl = "thankyou.asp" If (Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If Response.Redirect(MM_editRedirectUrl) End If End If end if %> FREE Submission Links for Driving Lessons : ADI Driving Lessons Dublin : Cork : Limerick : Driving Schools Ireland
a roadready service

Advertising - Irish Directory of Approved ADI Driving Schools and Instructors

<% if erro=1 then response.write "ERROR IN FORM PLEASE RESUBMIT " %> 

SUBMIT FOR FREE!!

ADI Driving Lessons has decided to provide FREE listings in exchange for reciprical links to our site. The only other stipulation is that you must be RSA ADI Approved and provide a valid link back to this website from your links page. No prices are allowed in your listing.

» Grade 1 Listing Free Listing (no reciprical link on your website) (Fill out your FREE listing now)
   You can fill out the form below with no other action but you will not place as high

»?strong>Grade 2 Listing Free Listing (with adidriving lessons.com link)
    You will place higher on the list

»?strong>Grade 3 Listing Free Listing (with RoadReady badge on your website)
    You will place higher on the list

Terms: You may submit 1 separate advert for each vehicle type if you provide those services.

PLease paste the following code on your links page if you can...

<!-- Link Start here --> <a href="http://www.adidrivinglessons.com" title="Driving Lessons Directory " >ADI Driving Lessons</a><!-- Link end here -->


Optional Badge for Your Website

RoadReady is increasing it's profile everyday with a RoadReady Badge you can benefit from our increased profile.
Your listing will be updated to a Grade 3 listing

Why use it?
1) It looks good!      2) It will help boost your relevance for SEO    3) It helps to support this FREE service   
4) We will give extra prominence (Grade 3) to listings with the badge!!!!

Be Safe, Be RoadReady

Be Safe, Be RoadReady

 

 

Attention ADI Instructors!

Get more customers and instant payback!
Sign up to our premium service to receive more prominent listings on this website. We have a proven record of increasing business for our members making our replica watches uk service cost neutral. Just one referral per month is all that is needed to make a positive return on your investment but we don't stop there. Our service works rolex replica sale for our members 24 / 7.

 

ADI Driving Lessons FREE Listing

Do you just want a listing on this website? This website scores top of the search engines for ADI related terms for driving schools. To signup for the year on this site use the paypal button below.

NOTE: Please do not enter rolex replica uk any varying data such as prices or special offers as these will not be changed at your request. Only relevant necessary contact information will be amended.

Company Name:
ADI No: * Compulsary
Website: www.url.com
Mobile:
Tel:
Email:
Image: A Snapshot of your website home page will be used
Tag Description:

Counties:

(Choose multiples
using shift or CTRL)

SELECT MULTIPLES USING SHIFT or CTRL
Primary Areas:
 
Type:
Select Car, HGV, Coach, or Motorcycle
CAPTCHA:

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