ODBC por Código
Publicado por Gonzalo Jara (7 intervenciones) el 24/01/2005 13:23:47
Tengo mi ODBC sin drama y ejecuto sql en Cristal Reports.
Ahora quiero realizar un modulo en VB, lo hice de la siguiente manera.
Inserte el componente ADO, en las propiedades lo enlace a la odbc y escribí un sql para desplegarlo en un list y me funcionó.
Lo que necesito hacer es crear un Dbcombo donde se pueda ingresar la descripcion de un producto y que se ordene segun el dato ingresado (like).
Mira en realidad, solo he programado con bases access, sin ODBC.
La idea es saber como iría el codigo de la conexión.
Por ejemplo, yo asi lo hago sin odbc y sin ADO.
En el modulo.
Public Base As Database
en el main()
Set Base = OpenDatabase("G:\orden\DBOT.mdb") Abro la base
y en el formulario.
SentenciaSQL = "Select * From Maestro Where NomMaestro Like '" & DBCNombre.Text & "*'"
Set DatMaestro2.Recordset = Base.OpenRecordset(SentenciaSQL)
en formulario tengo el DAT correspondiente.
* La pregunta del millon, como hago lo mismo con ODBC y ADO. ¿? en donde pueda consultar, insertar, borrar... ojala me pudieran ayudar o enviar otro ejemplo.
Ahora quiero realizar un modulo en VB, lo hice de la siguiente manera.
Inserte el componente ADO, en las propiedades lo enlace a la odbc y escribí un sql para desplegarlo en un list y me funcionó.
Lo que necesito hacer es crear un Dbcombo donde se pueda ingresar la descripcion de un producto y que se ordene segun el dato ingresado (like).
Mira en realidad, solo he programado con bases access, sin ODBC.
La idea es saber como iría el codigo de la conexión.
Por ejemplo, yo asi lo hago sin odbc y sin ADO.
En el modulo.
Public Base As Database
en el main()
Set Base = OpenDatabase("G:\orden\DBOT.mdb") Abro la base
y en el formulario.
SentenciaSQL = "Select * From Maestro Where NomMaestro Like '" & DBCNombre.Text & "*'"
Set DatMaestro2.Recordset = Base.OpenRecordset(SentenciaSQL)
en formulario tengo el DAT correspondiente.
* La pregunta del millon, como hago lo mismo con ODBC y ADO. ¿? en donde pueda consultar, insertar, borrar... ojala me pudieran ayudar o enviar otro ejemplo.
Valora esta pregunta


0