Quiero saber como puedo capturar los datos de acces a un richtexbox, estoy realizando de la siguiente forma:

Dim cad As Database
Dim cod As Recordset
Dim var As String

Set cad = Workspaces(0).OpenDatabase(App.Path & "\Datos.mdb")
Set cod = cad.OpenRecordset("codigo", dbOpenTable)


If cod.RecordCount > 0 Then
cod.MoveFirst
Do While Not cod.EOF

Loop

End If




- El tema ha sido cerrado

No es necesario que habras 2 post con el mismo tema, vamos a cerrar este y continuamos atendiendo tu problema en el hilo anterior.

http://www.yoreparo.com/foros/programacion/68336.html

Para mas informacion visita las FAQs y el REGLAMENTO de YoReparo.com

Atte. Juan Carlos
"carlitoszihua"
Moderador YoReparo.com