[Resolvido] como fazer aparecer "com qnts usuarios estaun cadastr

[lezão 0]

Olá galera estou precisando de uma ajudinha aki.

estou usando o seginte script abaixo e naun consigo colocar um "count" para ver com qnts usuarios tenho em meu banco de dados....

 

 

COD.

<%
Option Explicit
Response.Expires = 0
Dim objConn, objRs, strQuery, strConnection

'Conectando com o banco de dados dados.mdb
Set objConn =  Server.CreateObject("ADODB.Connection")
objConn.Open "DBQ=" & Server.MapPath("../../database/dados.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"

'Seleciona da tabela usuarios
strQuery = "SELECT * FROM usuarios"
Set ObjRs = objConn.Execute(strQuery)
%>

<-----------------------+-------------------------->

  <%
  'Move para o próximo registro
  objRS.MoveNext
  Wend
  'Fechando as conexões
  objRs.close
  objConn.close
  Set objRs = Nothing
  Set objConn = Nothing
  %>

[hargon 64]

Faça apenas...

strQuery = "SELECT Count(*) as totalUsuarios FROM usuarios"
Set ObjRs = objConn.Execute(strQuery)
response.write ObjRs("totalUsuarios")

[lezão 0]

Faça apenas...

strQuery = "SELECT Count(*) as totalUsuarios FROM usuarios"
Set ObjRs = objConn.Execute(strQuery)
response.write ObjRs("totalUsuarios")

Hargon

 

 

Deu certo Kara vlw muito obrigado............ http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

[hargon 64]

Bacana... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif