Rockwell Abrasives
Products >> Grinding Wheels
Grinding Wheels
Our superb line of grinding wheels offers versatility and sturdiness in all your grinding and finishing needs. Our grinding wheel performs tasks on all stone and tile surfaces in a very efficient and reliable fashion.
Available Sizes: 4", 6", 7"
<%
While ((NOT RecordsetMenu1.EOF))
%>
">
<%=(RecordsetMenu1.Fields.Item("ProductName").Value)%>
<%
RecordsetMenu1.MoveNext()
Wend
%>
Products
Polishing Pads <%if Request("CategoryID")=1 or Request("CategoryID")="" then %>
<%
While ((NOT Recordsetsubmenu1.EOF))
%>
&CategoryID=<%=Recordsetsubmenu1.Fields.Item("CategoryID").Value%>"> <%=(Recordsetsubmenu1.Fields.Item("ProductName").Value)%>
<%
Recordsetsubmenu1.MoveNext()
Wend
%>
<%
Recordsetsubmenu1.Close()
Set Recordsetsubmenu1 = Nothing
%>
<% end if%>
Diamond Blades
<%if Request("CategoryID")=2 then %>
<%
While ((NOT Recordsetsubmenu2.EOF))
%>
&CategoryID=<%=Recordsetsubmenu2.Fields.Item("CategoryID").Value%>">
<%=(Recordsetsubmenu2.Fields.Item("ProductName").Value)%>
<%
Recordsetsubmenu2.MoveNext()
Wend
%>
<%
Recordsetsubmenu2.Close()
Set Recordsetsubmenu2 = Nothing
%>
<% end if%>
Grinding Wheels
<%if Request("CategoryID")=3 then %>
<%
While ((NOT Recordsetsubmenu3.EOF))
%>
&CategoryID=<%=Recordsetsubmenu3.Fields.Item("CategoryID").Value%>"><%=(Recordsetsubmenu3.Fields.Item("ProductName").Value)%>
<%
Recordsetsubmenu3.MoveNext()
Wend
%>
<%
Recordsetsubmenu3.Close()
Set Recordsetsubmenu3 = Nothing
%>
<% end if%>
Air & Power Tools
<%if Request("CategoryID")=4 then %>
<%
While ((NOT Recordsetsubmenu4.EOF))
%>
&CategoryID=<%=Recordsetsubmenu4.Fields.Item("CategoryID").Value%>"><%=(Recordsetsubmenu4.Fields.Item("ProductName").Value)%>
<%
Recordsetsubmenu4.MoveNext()
Wend
%>
<%
Recordsetsubmenu4.Close()
Set Recordsetsubmenu4 = Nothing
%>
<% end if%>
Profile Tools
<%if Request("CategoryID")=5 then %>
<%
While ((NOT Recordsetsubmenu5.EOF))
%>
&CategoryID=<%=Recordsetsubmenu5.Fields.Item("CategoryID").Value%>"><%=(Recordsetsubmenu5.Fields.Item("ProductName").Value)%>
<%
Recordsetsubmenu5.MoveNext()
Wend
%>
<%
Recordsetsubmenu5.Close()
Set Recordsetsubmenu5 = Nothing
%>
<% end if%>
Accessories
<%if Request("CategoryID")=6 then %>
<%
While ((NOT Recordsetsubmenu6.EOF))
%>
&CategoryID=<%=Recordsetsubmenu6.Fields.Item("CategoryID").Value%>"><%=(Recordsetsubmenu6.Fields.Item("ProductName").Value)%>
<%
Recordsetsubmenu6.MoveNext()
Wend
%>
<%
Recordsetsubmenu6.Close()
Set Recordsetsubmenu6 = Nothing
%>
<% end if%>