<%@LANGUAGE="VBSCRIPT"%> <% Dim rs_Products__MMColParam rs_Products__MMColParam = "08" If (Request("MM_EmptyValue") <> "") Then rs_Products__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rs_Products Dim rs_Products_numRows Set rs_Products = Server.CreateObject("ADODB.Recordset") rs_Products.ActiveConnection = MM_madelaine_STRING rs_Products.Source = "SELECT image_01, image_02, image_03, image_04, image_05 FROM tbl_Products WHERE category = '" + Replace(rs_Products__MMColParam, "'", "''") + "' ORDER BY ordering_num ASC" rs_Products.CursorType = 0 rs_Products.CursorLocation = 2 rs_Products.LockType = 1 rs_Products.Open() rs_Products_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rs_Products_numRows = rs_Products_numRows + Repeat1__numRows %>


<% IF rs_Products__MMColParam <> "" THEN %>

<% END IF %>
.  
.  

Here are some examples of our custom manufacturing capabilities. We offer a fully integrated service that will meet all of your production requirements with speed, efficiency and reliability. We pride ourselves in having helped businesses from coast to coast establish new products and improve profitability.

We monitor the production of your custom products from first design to final shipment with the strictest of confidence. We will answer your questions, keep you informed and provide quotes throughout the process. Our custom manufacturing services include the following:

  • Design Consulting
  • Technical Drawings
  • Samples or prototypes prior to production
  • Prepare CIF (cost, insurance and freight) quotes
  • Oversee production and packaging of your product
  • Shipping and document preparation to worldwide destinations

Please call on us with your custom design requirements. We look forward to helping you make your project a successful one.
<% While ((Repeat1__numRows <> 0) AND (NOT rs_Products.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rs_Products.MoveNext() Wend %>
<% IF (rs_Products.Fields.Item("image_01").Value) <> "" THEN %> "> <%END IF%> <% IF (rs_Products.Fields.Item("image_02").Value) <> "" THEN %>
"> <%END IF%> <% IF (rs_Products.Fields.Item("image_03").Value) <> "" THEN %>
"> <%END IF%> <% IF (rs_Products.Fields.Item("image_04").Value) <> "" THEN %>
"> <%END IF%> <% IF (rs_Products.Fields.Item("image_05").Value) <> "" THEN %>
"> <%END IF%>
.  
   
<% rs_Products.Close() Set rs_Products = Nothing %>