Visual Basic y Mysql

[Comander]

Me gustaria que alguien me deijera o me diera un manual sobre Visual Basic 6 y Mysql....

GRACAS

[GeoAvila]

en las faq's hay un ejemplo de como hacer la conexion hacia mysql.. podes comenzar con eso..

nos vemos..

[Hager]

los metodos y datos son iguales, el manejo es casi el mismo que con cualquier motor de bd, busca una linea de conexión a la base de datos o crea un dns para iteractuar con el sistema, de resto funciona igual (claro si has trabajado con motores de bd antes....)

[GeoAvila]

claro pero antes instalar el ODBC 3.51 Driver que lo podes descargar de mysql.com de contrario nada funcionará..

nos vemos..

[Stickmaster2004]

pERO SIN EMBARGO PUES YO HICE ALGO CON LA CONEXION Y LE HICE ALGO CON EL DATACOMBO AQUI ESTA EL CODIGO, COMO DECIA GEOAVILA YA ESTA EN LAS FAQS SOLO HE AGREGADO ALGO PARA DARLE ALGO MAS DE FUNCIONALIDAD:

Private Sub Form_Load()
Dim Cxn As ADODB.Connection
Dim AdoS As ADODB.Recordset
Dim CxnFac As String
Set Cxn = New Connection
Cxn.CursorLocation = adUseClient
CxnFac = "Driver={MySQL ODBC 3.51 Driver};Server=localhost;Port=3306;Database=maneja dor;"
Cxn.Open CxnFac ' Abrimos la conexion
Set AdoS = New Recordset
AdoS.Open "Select * From clientes", Cxn, adOpenStatic, adLockOptimistic ' Abrimos el REcordset y esta listo para usar
MsgBox AdoS!nombre

While (AdoS.EOF = False) ' hay registros mientras que final de archivo(EOF) sea falso

Set DataCombo1.DataSource = AdoS
Set DataCombo1.RowSource = AdoS
DataCombo1.BoundColumn = "edad" 'guardamos internamente el valor del campo id que corresponde al nombre que escojamos
DataCombo1.ListField = "nombre" 'permite llenar la lista







AdoS.MoveNext ' que mueva uno hacia adelande

Wend 'Asi se cierra en mientras que en visual Basic

End Sub