Latest Projects

<% Set MyConn = Server.CreateObject("ADODB.Connection") MyConn.Open "driver={SQL Server};server=server=serverip;UID=username;PASSWORD=password;DATABASE=database" %> <%GetList = "SELECT * FROM Site_News WHERE UserID = '62' AND Deleted = 'no' ORDER BY NewsID DESC" SET RSList = MyConn.execute(GetList) if RSList.EOF Then%> <%else%> <%Do while not RSList.EOF%> <%RSList.Movenext Loop%> <%end if%>

no projects at present
">" width="60" height="<%=RSList("thumbHeight")%>" border="0" />	"><%=RSList("DateUploaded")%> - <%=RSList("Title")%>

home | about us | special offers | accreditations | faqs | contact

Web Design by The Consultancy