porque nao esta eecutando o if

[mestre fyoda 1]

Run-Time error : '450'

wrong number of arguments or invalid property assignment

 

Private Sub Form_Load()

 

con = Conexao.Execute(" Select COUNT(*) from AGE where DATAGE = 'Now()' ")

 

If con < 1 Then

Agenda.Show

End If

 

End Sub

alguem poderia me ajudar , pq nao ta dando certo ? a conexao ao BD esta correta ! O bd é MYSQL

[InterPlanet® 0]

Tanta assim: "Select COUNT(*) from AGE where (DATAGE = Now());"FLW

[mestre fyoda 1]

nao deu certo!

[luiz humberto 0]

Utilize o RecordSet, sendo assim terá acesso ao retorno da Query.