<%@LANGUAGE="VBSCRIPT"%> <% set rsDesign = Server.CreateObject("ADODB.Recordset") rsDesign.ActiveConnection = MM_Mustard_STRING rsDesign.Source = "SELECT * FROM gallery WHERE galcategory = 'Design'" rsDesign.CursorType = 0 rsDesign.CursorLocation = 2 rsDesign.LockType = 3 rsDesign.Open() rsDesign_numRows = 0 %> <% Dim HLooper1__numRows HLooper1__numRows = 6 Dim HLooper1__index HLooper1__index = 0 rsDesign_numRows = rsDesign_numRows + HLooper1__numRows %> Untitled Document
<% If Not rsDesign.EOF Or Not rsDesign.BOF Then %> <% startrw = 0 endrw = HLooper1__index numberColumns = 6 numrows = 1 while((numrows <> 0) AND (Not rsDesign.EOF)) startrw = endrw + 1 endrw = endrw + numberColumns %> <% While ((startrw <= endrw) AND (Not rsDesign.EOF)) %> <% startrw = startrw + 1 rsDesign.MoveNext() Wend %> <% numrows=numrows-1 Wend %>

Title:
<%=(rsDesign.Fields.Item("galtitle").Value)%>

 
Client:
<%=(rsDesign.Fields.Item("galclientname").Value)%>
Click Here For
More Details
<% End If ' end Not rsDesign.EOF Or NOT rsDesign.BOF %> <% If rsDesign.EOF And rsDesign.BOF Then %> This page is currently under construction - please call back soon <% End If ' end rsDesign.EOF And rsDesign.BOF %>
<% rsDesign.Close() %>