Contar o nº de linhas numa tabela

[jocapt]

Boa tarde,

Agradecia a vossa ajuda para tentar resolver um problema.

Tenho uma tabela em HTML que consigo mostrar o nº de linhas total com o script.
O problema é que a tabela tem campos de filtros, logo caso filtre um campo o e o resultado final seja mostrado numa única linha, o script que fiz continua a mostrar o nº total de linhas e não quantidade 1.

Alguém que me possa ajudar a resolver este problema?

Este é o código da tabela:

<table border="1" id="lista" >
<tr>
<td><input name="filt0" type="text" onKeyUp="filter('lista')" style="width: 111px" ></td>
<td class="style13"><input name="filt1" type="text" onKeyUp="filter('lista')" style="width: 144px" ></td>
<td><input name="filt2" type="text" onKeyUp="filter('lista')" style="width: 54px" ></td>
<td class="style17"><input name="filt3" type="text" onKeyUp="filter('lista')" style="width: 100%" ></td>
<td class="style21"><input name="filt4" type="text" onKeyUp="filter('lista')" style="width: 100%" ></td>
<td><input name="filt5" type="text" onKeyUp="filter('lista')" ></td>
<td><input name="filt6" type="text" onKeyUp="filter('lista')" /> </td>
</tr>
<% If RecProjecto002.EOF And RecProjecto002.BOF Then
Response.Write ""
Else
RecProjecto002.MoveFirst
While Not RecProjecto002.EOF%>
<tr>

<td class="style15" ><%=RecProjecto002("Local_geografico")%></td>
<td class="style16" ><%=RecProjecto002("Edificio")%></td>
<td class="style15" ><%=RecProjecto002("Piso")%></td>
<td class="style17" ><%=RecProjecto002("Servico")%></td>
<td class="style21" ><%=RecProjecto002("Sector_Nome")%></td>
<td class="style15" > <%=RecProjecto002("N_telefone")%></td>
<td class="style15" ><%=RecProjecto002("N_Intercomunicador")%></td>

</tr>

<%RecProjecto002.MoveNext%>
<% Wend
End If
%>

</table>
</div>
<button type="button" onclick="displayResult()">Mostra o nº de linhas da tabela</button>

Este é Script que mostra o nº de linhas:

<script>

function displayResult() {

alert(document.getElementById("lista").rows.length -1);

}

</script>

[Ronaldo Bueno]

Se entendi bem:

Coloca um contador, antes do While Not RecProjecto002.EOF

NumReg = 0

e antes do RecProjecto002.MoveNext

NumReg = NumReg + 1