bareta tava procurando um random asp e encontrei esse seu que funciona muito bem. Mas não estou conseguindo implementar a cláusula WHERE. Ela não funciona e o select pega toda a tabela Set rs = Server.CreateObject("ADODB.Recordset") SQL = "SELECT COUNT(id) AS total FROM fotos where album = 2" rs.Open SQL, strCon você sabe porque?