Set RSProduct = cndb.Execute("SELECT product.product_id,producttype.producttype_name,product.product_name,product.product_price,product.product_cost,product.product_unit,product.product_reorder,product.product_damaged,product.product_status FROM product ,producttype WHERE product.producttype_id = producttype.producttype_id Order By product_id")