Calculo de Porcentagem ASP

[Igormkt 0]

Tenho uma tabela com uma coluna onde os valores são 1 ou 0, preciso calcular a porcentagem de numeros 1 em relação ao total de registros;

entao eu preciso saber como contar os registros

como somar os registros com numero 1

e como fazer calculo de divisão?

[DSerma 19]

a = 0
i = 0
b = 0
While not rs.eof

if rs("numero") = "1" then
a = a + 1
end if
if rs("numero") = "" then
b = b + 1
end if

i = i + 0

rs.MoveNext
Wend

Response.Write("O total de registros com o numero 1 é de: " & a & "<br>")
per_1 = (i/100) * a
Response.Write("O PERCENTUAL de registros com o numero 1 é de: " & per_1 & "%<br>")
per_0 = (i/100) * b
Response.Write("O total de registros com o numero 0 é de: " & b & "<br>")
Response.Write("O PERCENTUAL de registros com o numero 0 é de: " & per_0 & "%<br>")

 

Apenas um exemplo

 

Abraços...