<% Dim ProdClassID,ClassName Dim rs,sql ProdClassID = request("ProdClass") ClassName = request("ClassName") if ClassName<>"" then session("ClassName")=ClassName end if ClassName=session("ClassName") %> Products

if you haven't seen anything,please kick the follow link. Thanks! www.mesdeco.com/shade.html