<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim Recordset1 Dim Recordset1_cmd Dim Recordset1_numRows Set Recordset1_cmd = Server.CreateObject ("ADODB.Command") Recordset1_cmd.ActiveConnection = MM_hurley_STRING Recordset1_cmd.CommandText = "SELECT * FROM projects WHERE projectlive ='yes' ORDER BY projectdate DESC" Recordset1_cmd.Prepared = true Set Recordset1 = Recordset1_cmd.Execute Recordset1_numRows = 0 %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> FP Hurley and Sons - Building Services Contractors (Mechanical and Electrical)
 
 
 
FP Hurley and Sons
  
     
         

 

Website terms and conditions for use

Accuracy

FP Hurley and Sons Ltd makes every effort to ensure that the information published on this website is accurate. However, we cannot accept any liability for the accuracy of content. Visitors who rely on this information do so at their own risk.

'Add to favourites' option

Saving links using the'my favourites' option gives you a quick list of your favourite pages on our website. This works by saving a 'cookie' on your machine storing the URL of the page you've visited.

Cookies are pieces of data that are often created when you visit a website and are stored in the cookie directory of your own computer. Cookies are used to store a session ID which allows you to log-in and make comments. We do not save personal or machine data. In order for this optional facility to work you need to have cookies enabled.

Other online services

All personal data collected through other online services, such as enquiry forms, is used only for the purpose of providing you access to those services, and to contact you about updates to those services. We do not pass your details to third parties.

Virus protection

While FP Hurley and Sons Ltd make every effort to check and test material at all stages of production, it is always wise for users to run an anti virus program on all material downloaded from the Internet.

FP Hurley and Sons Ltd cannot accept any responsibility for any loss, disruption or damage to your data or your computer system which may occur whilst using material off the FP Hurley and Sons Ltd website.
             
             
  Our Accreditations HVCA

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