Bueno amigos aqui os pongo un video realizado por mi donde se muestra como enlazar una base de datos de mysql sencilla con Visual Basic 6, es basico pero creo que ayuda, no es que sea especialista pero ya que estoy comenzando espero que le ayude a gente como yo, seguro que se puede mejorar y perfeccionar pero a nivel basico esta bastante bien, gracias y un saludo a todos.
codigo
Código
PrivateSub Command1_Click()
Dim i AsInteger
'1º EJECUTAR LA CONSULTA
Data1.Commands(1).Execute
'2º ABRIR EL RECORDSET
If Data1.Recordsets(1).State = 0 Then
Data1.Recordsets(1).Open
EndIf
'3º procesar la informacion
For i = 1 To Data1.Recordsets(1).RecordCount
List1.AddItem Data1.Recordsets(1).Fields(0).Value
Data1.Recordsets(1).MoveNext
Next
'4ºcerrar el recordset
If Data1.Recordsets(1).State = 1 Then
Data1.Recordsets(1).Close
EndIf
EndSub
« Última modificación: 21 Junio 2012, 21:32 pm por raul338 »
trata de no usar mas el control Data, aparte de estar en desuso, ya esta obsoleto ya que funciona con DAO, que es un metodo viejo de acceso a datos, y en proyectos grandes es imposible manejar, usa ADO y desde codigo todo. DAO ya no existe. y te podes conectar a MySQL directamente sin ODBC.
@BARMANMMA: veo que estás utilizando un conector MySQL ya bastante pasado, actualmente va por la v. 5.1.11
@seba123neo: Totalmente de acuerdo a lo de utilizar ADO y todo por código.
Citar
y te podes conectar a MySQL directamente sin ODBC.
¿A qué te refieres ahí? Para poder conectar a MySQL necesariamente hay que instalar su conector (driver ODBC). Luego ADO a más bajo nivel pasa por ODBC. Corrígeme si me equivoco.
¿O te refieres a instalar el conector y no crear ningún DSN en el equipo y directamente trabajar con la cadena de conexión, que personalmente creo que es mejor y más versátil?
claro, el driver de mysql hay que instalarlo si o si, me refiero a no tener que crear un DSN para conectar, se puede hacer con una simple cadena de conexion que use el driver directamente, como en todos los motores de base de datos.
Autor
En línea
