% set rs=Server.CreateObject("ADODB.recordset") sql="SELECT distinct catagory FROM addcat" rs.Open sql, conn %>