QTOS REGISTROS MEU SELECT RETORNOU ?
Prezados Amigos:
Utilizo VB6 + ACESS 2000 (DAO 3.6).
O meu select retorna 03 registros. Mas antes de usa-los, a expressao
rsdetlot.RecordCount informa que tenho apenas 1.
Estou usando o comando certo ? Como devo fazer p/ saber a qtdade de registros correta ?
Utilizo VB6 + ACESS 2000 (DAO 3.6).
O meu select retorna 03 registros. Mas antes de usa-los, a expressao
rsdetlot.RecordCount informa que tenho apenas 1.
Estou usando o comando certo ? Como devo fazer p/ saber a qtdade de registros correta ?
esse é um bug do DAO
para resolver mova record para a ultima posicao
rsdetlot.movelast
dai sim dar um recordcount
para resolver mova record para a ultima posicao
rsdetlot.movelast
dai sim dar um recordcount
Depois nã ose esqueça de aplicar o Move First para retornar o cursor ao primeiro registro.
rsdetlot.movelast
rsdetlot.moveFirst
msgbox rsdetlot.RecordCount
Abs
rsdetlot.movelast
rsdetlot.moveFirst
msgbox rsdetlot.RecordCount
Abs
Antes de abrir a conexão, utilize o seguinte
rs.CursorLocation = aduseClient
Acho que isso deve resolver...
rs.CursorLocation = aduseClient
Acho que isso deve resolver...
Outra alternativa é abrir a tabela da seguinte forma:
fazendo desta forma, na variável varRegs será armazenado o número de registros afetados, ou seja, a quatidade correta do RecordCount.
Dim varRegs as Double
set rsdetlot = Bd.Execute("SELECT ...",varRegs)
fazendo desta forma, na variável varRegs será armazenado o número de registros afetados, ou seja, a quatidade correta do RecordCount.
Tópico encerrado , respostas não são mais permitidas