Contar registros...ja fiz.

[presley 0]

pessoal fiz um contador de registros mas ela sai no final da tabela como mostrado no exemplo, como coloco-a em cima da tabela os resultados?

gostaria que ficasse nessa primeira linha antes da tabela:

dim conecta, SQL, tabela, totalResponse.Write "<center>Forão Encontrados "&"<b>"& total &"</b>"&" Registros!</center>"Response.Write "<font face=arial size=2>"Response.Write "<table border=1 align=center>"Response.Write  "<tr align=center>"Response.Write    "<td colspan=3><font face=arial color=blue size=2><b>RESULTADO DA PESQUISA</b></font></td>"Response.Write  "</tr>"Response.Write  "<tr>"Response.Write    "<td align=center><b><font face=arial size=2>Nome</font></b></td>"Response.Write    "<td align=center><b><font face=arial size=2>Setor</font></b></td>"Response.Write    "<td align=center><b><font face=arial size=2>E-mail</font></b></td>"......................... ................. .................... ...............do while not tabela.EOF %>  </tr>  <tr align="center">    <td><font face="arial" size="2"><%Response.write tabela.Fields("NOME")%></font></td>    <td><font face="arial" size="2"><%Response.write tabela.Fields("SETOR")%></font></td>    <td><font face="arial" size="2"><b><a href="mailto:"><%Response.write tabela.Fields("LOGIN")&"@uefs.br"%></a></b></font></td>  </tr><%total = total + 1tabela.MoveNextLoopconecta.CloseSet conecta = nothing%></table><%Response.Write "<center>Forão Encontrados "&"<b>"& total &"</b>"&" Registros!</center>"%>

Muito obrigado!

[Salgado 4]

Veja se é isso que você quer:

dim conecta, SQL, tabela, total
while not tabela.EOF
total=total+1
tabela.movenext
wend
tabela.movefirst

Response.Write "<center>Forão Encontrados "&"<b>"& total &"</b>"&" Registros!</center>"
Response.Write "<font face=arial size=2>"
Response.Write "<table border=1 align=center>"
Response.Write  "<tr align=center>"
Response.Write    "<td colspan=3><font face=arial color=blue size=2><b>RESULTADO DA PESQUISA</b></font></td>"
Response.Write  "</tr>"
Response.Write  "<tr>"
Response.Write    "<td align=center><b><font face=arial size=2>Nome</font></b></td>"
Response.Write    "<td align=center><b><font face=arial size=2>Setor</font></b></td>"
Response.Write    "<td align=center><b><font face=arial size=2>E-mail</font></b></td>"

do while not tabela.EOF %>
</tr>
<tr align="center">
  <td><font face="arial" size="2"><%=tabela("NOME")%></font></td>
  <td><font face="arial" size="2"><%=tabela("SETOR")%></font></td>
  <td><font face="arial" size="2"><b><a href="mailto:"><%=tabela("LOGIN")&"@uefs.br"%></a></b></font></td>
</tr>
<%tabela.MoveNext
Loop
conecta.Close
Set conecta = nothing
%>
</table>

<%Response.Write "<center>Forão Encontrados "&"<b>"& total &"</b>"&" Registros!</center>"%>

 

Valeu?

[presley 0]

Grande gigante... era isso mesmo...brigadao! ;)

[d.eleete 0]

tipo kra.. na amizade, é "foram" não forão . . .!