informações vinda do banco

caras é o seguintejogo na tela atraves de instrucões select os dados de um determinado cliente.....vou dar um exeplo de um...."endereços"eu quero jogar na tela todos os tlefones do cara com a nstrução select q eu estou fazendo só esta aparecendo o 1º endereço como eu faço para listar todos e não só umao código é essers = Session("cliente") rsquery = "select TipoEndereco from clientesender where cliente = '"&rs&"'" set sql = Conn.Execute(rsquery) Estado =sql("Estado") Correspondencia =sql("Correspondencia") Cep = sql("Cep") Complemento = sql("Complemento") Numero = sql ("Numero") Bairro = sql ("Bairro") Cidade = sql ("Cidade") Endereco = sql ("Endereco")me ajudem ai carssss