Erro em busca no BD com select AVG

[Renan Mafra]

Olá pessoal,

É o seguinte... estou fazendo uma busca no BD para

retornar a media de uma votação. O código faz o seguinte,

sqlstring = "SELECT AVG(produto1)as nota1, AVG(produto2)as nota2 FROM"

"avaliacoes WHERE nome = '" & produto & "'"

- seleciona as médias de determinado produto, depois....

set rs2 = server.creatobject("ADODB.Recordset")

rs2.activeconnection = con

rs2.cursortype = 3

rs2.open sqlstring

- aqui verifico se existe essa votação no BD

if not rs.eof then

var1 = rs(nota1)

var2 =rs(nota2)

var1_1 = formatnumber(var1, 1)

var2_2 = formatnumber(var2, 1)

else

AQUI aparece que caso não tenha registros no BD aparece

um texto como SEM NOTA

end if

O problema que esta acontecendo é que se existe a votação, ocorre tudo OK,

mais se não existe ele passa pelo if not rs.eof then, e apresenta um erro,

ou seja mesmo que não exista nenhuma votação para ele, ele vai em frente

em vez de mostrar SEM NOTA, aí aparece erro o erro acontece no formatnumber

pois não tem nenhum número para formatar....

Que esta acontecendo pessoal ???????

[bareta]

poste a mesnsagem de erro