Com saber a quantidade de registro de um banco de dados

[lifenetwork 0]

Boa noite

 

Tenho um banco de dados Access onde tenho uma coluna chamado Status, todo registro que não foi respondido ele fica com o valor ( N ).

 

Preciso saber quantos registros tem com a letra N e depois imprimir ta tela do painel com a resposta --> Chamados não atendidos : 5

 

 

Obrigado

[Gilberto Jr 26]

Bom dia,

 

Simples, com um count você resolve essa situação.

 

 

select count(*) from table where colun='N'

 

Att;

[xanburzum 169]

dependendo da situacaun melhor usar um contatdor normal ou a clausula count do SQL, pois se o seu bd for muito grande o recordcount do objeto recordset para apresentar queda de desempenho
e para usar o RecordCount , seu cursortype tem k ser recordset.CursorType = 3 (AdOpenDynamic)

exemplo:

<%
DIM mySQL, objRS
mySQL = "SELECT * FROM myTable"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open mySQL, objConn

' Count how many records exist
DIM iRecordCount
iRecordCount = 0
DO WHILE NOT objRS.EOF
iRecordCount = iRecordCount + 1
objRS.MoveNext
Loop

' Display result
Response.Write "(" & iRecordCount & ")"

objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>

SQL COUNT

<!--#INCLUDE VIRTUAL="/includes/connection.asp" -->

<%
DIM mySQL, objRS
mySQL = "SELECT Count(*) AS intTotal FROM myTable"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open recSQL, objConn

' Display result
Response.Write objRS("intTotal")

objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
 

[lifenetwork 0]

Bom dia

 

Obrigado pela ajuda, estou aprendendo agora um pouco sobre ASP.

 

Fui testar o codigo acima adaptando para meu sistema e tive o erro abaixo...

 

ADODB.Recordset error '800a0bb9'

Os argumentos são incorretos, estão fora do intervalo aceitável ou estão em conflito.

/adm/teste3.asp, line 7

 

 

Este erro esta dando na linha : objRS.Open recSQL, objConn

 

Obrigado

[wilnet 92]

Olá lifenetwork,

 

Verifica as variáveis em sua conexão, veja se estão corretas e principalmente, com o mesmo nome "objConn"

 

Att

[Gilberto Jr 26]

Você consegue acessar os dados e mostrar na tela?

 

Att;

[lifenetwork 0]

nao aparece nda ja da o erro direto

[wilnet 92]

poste sua connection.asp

[Gilberto Jr 26]

Então o seu erro esta na sua conexão com o banco de dados ou na sua sql pra mostrar os dados na tela.

 

Você esta usando que banco? Poste o seu código de acesso ao banco de dados e o seu código que recupera os dados que esta na tela pra mostrar os dados.

 

Att;

[Morpheus#2005 1]

da uma olhada no seu /includes/connection.asp e coloca o nome da mesma variavel de conexao ...no teste.asp

[PRSolucaoWeb 0]

Coloca assim:

 

set conta = server.CreateObject("adodb.recordset")
set conta = db_conn.execute ("select count(*) as conta from NO_SERIE_PRODUTO_ITENS where id_produto = "& id_produto)
response.write conta("conta")

[Gilberto Jr 26]

Coloca assim:

 

set conta = server.CreateObject("adodb.recordset")

set conta = db_conn.execute ("select count(*) as conta from NO_SERIE_PRODUTO_ITENS where id_produto = "& id_produto)

response.write conta("conta")

 

Na verdade teria que ser

response.write conta(conta("conta"))

 

O neste caso o erro esta no

response.write()

 

Att;

[xanburzum 169]

Isso é muitas vezes porque você usou os nomes "amigáveis" para os valores (tais como adLockReadOnly), em vez dos constantes inteiras (que são os únicos valores compreendidos pelo engine), sem incluir ADOVBS.INC. Então, uma solução rápida muitas vezes pode ser para se certificar de que você incluiu ADOVBS.INC.