[VB6] SELECT COUNT DISTINCT
Castelo faltava mesmo o group by mas tem um contratempo ele ao estar a agrupar sao 3 resultados diferentes
ex: os ids qe estao na bd 14,15,16,14
com isto [Ô]Select distinct id, count(id) as total from conta group by id[Ô] o resultado é
14-2
15-1
16-1
eu preciso que ele me dê o resultado de 3 , que é o numero de ids diferentes percebe ?
isso ta bom mas o resultado que pretendo é 3 , e nao agrupados assim percebe ?
ex: os ids qe estao na bd 14,15,16,14
com isto [Ô]Select distinct id, count(id) as total from conta group by id[Ô] o resultado é
14-2
15-1
16-1
eu preciso que ele me dê o resultado de 3 , que é o numero de ids diferentes percebe ?
isso ta bom mas o resultado que pretendo é 3 , e nao agrupados assim percebe ?
usa um RecordCount
Pois o SELECT irá mostrar só 3 resultados.
Pois o SELECT irá mostrar só 3 resultados.
SYSZEN
Resolvido.
SELECT Count(*) AS total FROM (SELECT DISTINCT id FROM conta)
Irá retornar 3 no seu select.
No meu usando o exemplo de dados da outra página me retornou 6 registros.
Até eu aprendi com essa agora.
Té +
Resolvido.
SELECT Count(*) AS total FROM (SELECT DISTINCT id FROM conta)
Irá retornar 3 no seu select.
No meu usando o exemplo de dados da outra página me retornou 6 registros.
Até eu aprendi com essa agora.
Té +
Citação::
SYSZEN
Resolvido.
SELECT Count(*) AS total FROM (SELECT DISTINCT id FROM conta)
Irá retornar 3 no seu select.
No meu usando o exemplo de dados da outra página me retornou 6 registros.
Até eu aprendi com essa agora.
Té +
da-me erro eu já tinha exprimentado isso que tinha visto na net
erro 3131 : syntax error in FROM clause
Citação::
usa um RecordCount
Pois o SELECT irá mostrar só 3 resultados.
eu nunca consegui utilizar o recordcount diz que é uma funcao ou metodo indefenido
SYSZEN
Não sei se ajudará, pois não trabalho desta forma que você descreveu seu problema... mas achei algo no google
http://en.allexperts.com/q/Using-MS-Access-1440/Counting-Records-2.htm
Dim sHolder
Dim rst As Object
Set rst = Me.RecordsetClone
rst.MoveLast
sHolder = rst.RecordCount
Text1.text = sHolder
Não sei se ajudará, pois não trabalho desta forma que você descreveu seu problema... mas achei algo no google
http://en.allexperts.com/q/Using-MS-Access-1440/Counting-Records-2.htm
Dim sHolder
Dim rst As Object
Set rst = Me.RecordsetClone
rst.MoveLast
sHolder = rst.RecordCount
Text1.text = sHolder
RESOLVIDO
codigo resolvido :
conta.RecordSource = [Ô]SELECT distinct id , count(id) as total from conta group by id[Ô]
conta.Refresh
conta.Recordset.MoveLast
dif = conta.Recordset.RecordCount
conta.RecordSource = [Ô]select * from conta[Ô]
conta.Refresh
codigo resolvido :
conta.RecordSource = [Ô]SELECT distinct id , count(id) as total from conta group by id[Ô]
conta.Refresh
conta.Recordset.MoveLast
dif = conta.Recordset.RecordCount
conta.RecordSource = [Ô]select * from conta[Ô]
conta.Refresh
Tópico encerrado , respostas não são mais permitidas