% set conn = DBconn( ) cQuery = "select * from T_Category where Category_name not like '%(FR)' and Status_Off_On=1 order by DisplayOrder;" set oRsCategories = OpenRs (cQuery,conn) idCat = request("idCat") if idCat="" then idCat=0 cQuery = "select * from T_Category where idCategory=" & idCat set oRsOneCat = OpenRs (cQuery,conn) if not oRsOneCat.eof then cCategoryName = oRsOneCat("Category_Name") cCategoryImage = oRsOneCat("Category_Image") end if %>