<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim RScase Dim RScase_numRows Set RScase = Server.CreateObject("ADODB.Recordset") RScase.ActiveConnection = MM_dearing_STRING RScase.Source = "SELECT * FROM casestudies ORDER BY caseDate DESC" RScase.CursorType = 0 RScase.CursorLocation = 2 RScase.LockType = 1 RScase.Open() RScase_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 4 Repeat1__index = 0 RScase_numRows = RScase_numRows + Repeat1__numRows %>

Welcome

Since its formation in 1986 Dearing Plastics has become established as a leader in the field of plastic mouldings manufacture.

Products

Design and Manufacture
Injection Moulding
Assembly and Packaging

Case Studies

"><%=left(RScase.Fields.Item("caseTitle").Value, 26)%>...

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