RECORDCOUNT
Dó migrando e não achei nada que mes explicasse.
Qdo usava o dao eu usava o seguinte comando para carregar os regitros
Qual é o comando que verifica o total de registro usando o ADODB e o FireBird?
Qdo usava o dao eu usava o seguinte comando para carregar os regitros
Private Carrega()
If dtc_regi.RecordSet.RecordCount > 0 Then
dtc_regi.RecordSet.MoveFirst
While not dtc_regi.RecordSet.EOF
'Aqui eu carregava meu combo, por exemplo
Wend
EndifQual é o comando que verifica o total de registro usando o ADODB e o FireBird?
oi, olhe o e-mail q eu te mandei q eu acho qq te ajudara.
como assim adodb?
ado.recordsource="select * from TABELA"
ado.refresh
total=ado.recordset.recordcount
ow por variaveis após abrir a conexão com a TABELA
total = rs.recordcount
ado.refresh
total=ado.recordset.recordcount
ow por variaveis após abrir a conexão com a TABELA
total = rs.recordcount
O codigo esta correto, porem quando uso o Firebird mesmo contendo tres ou mais registros ele sempre mostra -1 qdo uso rs.recordcount
Olha q eu estou fazendo
Quero saber se tem algo pra descobrir o qtde de registro no meu recordset.
Lembrando que estou usando referencia ao Microsoft Actvex Data Objects 2.7 Library, portando nem um componente (como data ou adodc). Se não tiver jeito mesmo não tem problema.
Olha q eu estou fazendo
Private Sub CarregaDados()
Dim Rs AS ADODB.RecordSet
Set Rs = New ADODB.RecordSet
Rs.Open "Select * from tbl_regi", Conn, AdOpenKeyset, adLockPessimistic"
'Lembrando que Conn é a conexão que já foi carregada. Então até ae esta OK
'Aqui eu precisava saber se tem o nao registro para nao ocorrer erro
'Se tiver registro ele executa o while para carregar dados, se não tiver, ele apenas sai do sub.Quero saber se tem algo pra descobrir o qtde de registro no meu recordset.
Lembrando que estou usando referencia ao Microsoft Actvex Data Objects 2.7 Library, portando nem um componente (como data ou adodc). Se não tiver jeito mesmo não tem problema.
bom após abrir o seu rs, faça
msgbox rs.recordcount
este é o comando: rs.recordcount
se você fez assim e ainda esta dando -1, possivelmente tem alguma rotina sua que esta fechando a conexao ou o rs logo apos o seu apom, algo como
conn.close
ou
rs.close
msgbox rs.recordcount
este é o comando: rs.recordcount
se você fez assim e ainda esta dando -1, possivelmente tem alguma rotina sua que esta fechando a conexao ou o rs logo apos o seu apom, algo como
conn.close
ou
rs.close
no load
Label3.Caption = "Total de Registros : " & rsApartamentos.RecordCount
Label3.Caption = "Total de Registros : " & rsApartamentos.RecordCount
Mas se ele estivesse fechado ele não carregaria os dados certo?
eu ponho isso no load quando abre o form, e pra acrescentar mais um registro ponho no meu botao NOVO REGISTRO
whellnet, é isso mesmo, então você abre, carrega os dados, utiliza o recordcount e só depois disto você fecha, no meu entender você poderia estar fechando o objeto antes de utilizar o recordcount, isso esta ocorrendo???
coloca adUseClient na propriedade CURSORLOCATION antes de abrir o recordset...
Tópico encerrado , respostas não são mais permitidas