'--Crear la conecion con el ODBC--
Dim CnDatos As New ADODB.Connection
Dim RsTblDatos As New ADODB.Recordset
Por si le interesa
.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--