como cargar recorset en access estoy intentando hacer que un recorset se llene con valores obtenidos por la ejecucion de una consulta SQL pero no me funciona e probado esto sin resultado No da error, pero tampoco se carga:
Cita:
se ejecuta al presionar un boton Option Compare Database
Private Sub boton_Click()
Dim dbs As Database
Dim RS As Recordset
sql = ""
Set dbs = CurrentDb
sql = "SELECT * FROM Textos"
Set RS = dbs.OpenRecordset(sql, dbOpenSnapshot)
x = RS.RecordCount
End Sub
Private Sub boton_Click()
Dim dbs As Database
Dim RS As Recordset
sql = ""
Set dbs = CurrentDb
sql = "SELECT * FROM Textos"
Set RS = dbs.OpenRecordset(sql, dbOpenSnapshot)
x = RS.RecordCount
End Sub
¿Alguien sabe como lo puedo hacer?
