<% set rs=Server.CreateObject("Adodb.recordset") sql="select * from CategoryMaster_pro where status='Y' " rs.open sql,EuropeanCON,3,2 totalproduct=rs.recordcount 'Response.Write(totalproduct) i=1 while not rs.eof sub_cat_link="products.asp?catid="&rs("CategoryId") Response.Write adsaas %> <% if i mod 4=0 then %> <% end if i=i+1 rs.movenext wend %> <%if totalproduct=1 then%> <% elseif totalproduct=2 then%> <% End If %>
<%=rs("CategoryName")%>