<%@LANGUAGE="VBSCRIPT"%> <% Set objCart=new Cart %> <% Dim rsSubcategories__MMColParam rsSubcategories__MMColParam = "9" If (Request("MM_EmptyValue") <> "") Then rsSubcategories__MMColParam = Request("MM_EmptyValue") End If %> <% set rsSubcategories = Server.CreateObject("ADODB.Recordset") rsSubcategories.ActiveConnection = MM_connLogCabin_STRING rsSubcategories.Source = "SELECT * FROM Subcategories WHERE categoryid = " + Replace(rsSubcategories__MMColParam, "'", "''") + " ORDER BY subcategory ASC" rsSubcategories.CursorType = 0 rsSubcategories.CursorLocation = 2 rsSubcategories.LockType = 3 rsSubcategories.Open() rsSubcategories_numRows = 0 %> <% set rsManufacturers = Server.CreateObject("ADODB.Recordset") rsManufacturers.ActiveConnection = MM_connLogCabin_STRING rsManufacturers.Source = "SELECT DISTINCT manufacturer FROM Products WHERE catid = 9" rsManufacturers.CursorType = 0 rsManufacturers.CursorLocation = 2 rsManufacturers.LockType = 3 rsManufacturers.Open() rsManufacturers_numRows = 0 %> <% set rsRanges = Server.CreateObject("ADODB.Recordset") rsRanges.ActiveConnection = MM_connLogCabin_STRING rsRanges.Source = "SELECT DISTINCT range_name FROM Products WHERE catid = 9 ORDER BY range_name ASC" rsRanges.CursorType = 0 rsRanges.CursorLocation = 2 rsRanges.LockType = 3 rsRanges.Open() rsRanges_numRows = 0 %> <% set rsColours = Server.CreateObject("ADODB.Recordset") rsColours.ActiveConnection = MM_connLogCabin_STRING rsColours.Source = "SELECT * FROM WoolColours" rsColours.CursorType = 0 rsColours.CursorLocation = 2 rsColours.LockType = 3 rsColours.Open() rsColours_numRows = 0 %> The Log Cabin, Brentwood - Quilting and Patchwork essentials

Selector

100% Cotton Fabrics
Waddings
Books & Videos
Magazines
Notions
Threads
Sewing Machines
Wools
Special Offers
Just select the area of the shop you wish to browse from the list above.
Site © The Log Cabin <%response.write Year(Now())%>
Design © k web design <%response.write Year(Now())%>
<% strSubCategory = (rsSubcategories.Fields.Item("subcategory").Value) %>The Log Cabin stocks a wide range of <%= strSubCategory %>. The selector below will help you to find exactly the product you are looking for, or you can go through our entire range to help inspire you!
Selector
Make a selection from one of the boxes below
View <%= strSubCategory %> by colour

 
View <%= strSubCategory %> by pattern

View <%= strSubCategory %> by range

View <%= strSubCategory %> by manufacturer

You have <%=objCart.TotalNumberItems%> items in your trolley, total value £<%= FormatNumber(objCart.GrandTotal, 2, -2, -2, -2) %>

How to find us

Click here for a local map.
<% Set objCart=Nothing %> <% rsSubcategories.Close() %> <% rsManufacturers.Close() %> <% rsRanges.Close() %> <% rsColours.Close() %>