¿COMO HAGO CONSULTAS SQL EN ADO?
Publicado por Jorge Esposito (29 intervenciones) el 10/03/2002 19:18:34
Estando en Visual Basic 6 (RDO) acostumbraba estas consultas:
'Conteo de registros:
Set Consulta = conec.OpenResultset("Select count(*) from MiTabla", rdOpenDynamic, rdConcurRowVer)
'Consulta los registros
Set Consulta = conec.OpenResultset("Select * from MiTabla", rdOpenDynamic, rdConcurRowVer)
If Consulta(0) > 0 Then
' La tabla no esta vacia
Consulta.Movefirst
End If
Yo quiero migrarlas a ADO y no sé ¿Cómo?.
'Conteo de registros:
Set Consulta = conec.OpenResultset("Select count(*) from MiTabla", rdOpenDynamic, rdConcurRowVer)
'Consulta los registros
Set Consulta = conec.OpenResultset("Select * from MiTabla", rdOpenDynamic, rdConcurRowVer)
If Consulta(0) > 0 Then
' La tabla no esta vacia
Consulta.Movefirst
End If
Yo quiero migrarlas a ADO y no sé ¿Cómo?.
Valora esta pregunta
0