Contator De Registros

[Ander]

Como faço para que em uma determinda pesquisa em uma datalist com resultado em uma datagrid contados os registros que foram localizados a partir da consulta meu codigo que faz a consulta e o seguinte:

Private Sub DataList1_Click()

Dim strconsulta As String

strconsulta = "Select * from Clientes Where Atividade = '" & DataList1.BoundText & "' OR Atividade2 = '" & DataList1.BoundText & "' OR Atividade3 = '" & DataList1.BoundText & "'"

With Adodc2

.RecordSource = strconsulta

.Refresh

End With

With DataGrid1

.ClearFields

.ReBind

End With

Label1.Caption = "Relação de Empresa com o Ramo: " & DataList1.Text

End Sub

[Graymalkin]

Não seria só fazer um SELECT COUNT(*) AS quantidade_de_registros com os mesmos critérios dessa sua consulta?

Abraços,

Graymalkin

[Guest Continuado]

mas em que parte em ponho esse comando no meu codigo acima

[Graymalkin]

mas em que parte em ponho esse comando no meu codigo acima

Você vai ter que executar esse código em um objeto Connection e o resultado dele vai ser um recordset com aquele campo.

Abraços,

Graymalkin