Browse by Stone <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select c1v from products where cat='Beads' and gemcat='Semi Precious' group by c1v order by c1v" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Shape <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select shape from products where cat='Beads' and gemcat='Semi Precious' group by shape order by shape" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Stone <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select c1v from products where cat='Beads' and gemcat='Precious' group by c1v order by c1v" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Shape <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select shape from products where cat='Beads' and gemcat='Precious' group by shape order by shape" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Stone <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select c1v from products where cat='Silver Jewellery' group by c1v order by c1v" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Item <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select subcat from products where cat='Silver Jewellery' group by subcat order by subcat" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Stone <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select c1v from products where cat='Beaded Jewellery' group by c1v order by c1v" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Item <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select subcat from products where cat='Beaded Jewellery' group by subcat order by subcat" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Stone <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select c1v from products where cat='Silver Beads' group by c1v order by c1v" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Item <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select subcat from products where cat='Silver Beads' group by subcat order by subcat" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Stone <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select subcat from products where cat='Gem Stones' group by subcat order by subcat" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Browse by Shape <% Set rs=Server.CreateObject("ADODB.Recordset") sql="select shape from products where cat='Gem Stones' group by shape order by shape" rs.open sql,coni,3,2,1 i=1 while not rs.eof %><%=rs(0)%> <% rs.movenext wend rs.close %>
Home | About Us | Privacy Policy | Customer Services | My Account | View Shopping Cart || Contact Us | F.A.Q. | Terms of Uses | Return Policy | Security Policy | Currency Converter | Order Form | Resources1 & 2
Send your
