<%@ Language=VBScript %>
<%
	if Request.QueryString("BurrCat")="IB" then
		Session("ProductSelected")="Burr"
		Session("BurrType")="Industrial"
	elseif Request.QueryString("BurrCat")="IE" then
		Session("ProductSelected")="EndMill"
		Session("BurrType")="All"
	elseif Request.QueryString("BurrCat")="ID" then
		Session("ProductSelected")="Drill"
		Session("BurrType")="All"
	elseif Request.QueryString("BurrCat")="IR" then
		Session("ProductSelected")="Reamer"
		Session("BurrType")="All"
	elseif Request.QueryString("BurrCat")="SD" then
		Session("ProductSelected")="Burr"
		Session("BurrType")="DentalLab"
	elseif Request.QueryString("BurrCat")="SB" then
		Session("ProductSelected")="Burr"
		Session("BurrType")="Surgical"
	end if
	Response.Redirect "proddisplay.asp"
%>