Ver Mensaje Individual
  #14 (permalink)  
Antiguo 26/12/2007, 12:19
extrem_bcn
 
Fecha de Ingreso: julio-2007
Ubicación: Delante del PC (Barcelona
Mensajes: 157
Antigüedad: 16 años, 10 meses
Puntos: 2
Re: Conectar Mysql Con VB6

Cita:
Iniciado por macmia Ver Mensaje
hola necesito ayuda, tengo que conectar una bd de mysql con vb6 pero ya intente todo lo que viene en el foro pero no me sale.PORFAVOR AYUDENME SI, creo tener el instalador de odbc pero parece que no se usalo porfavor ayudenme con eso.

mil gracias

mi correo es [email protected] para cualquier cosa
Aver te lo explicaré lo mejor que pueda.



Código:
Private Sub Command1_Click()

Dim CON As ADODB.Connection
Dim rt As ADODB.Recordset
Dim strSQL as String

'creas el Objeto CON (será la connexión)
Set CON = New ADODB.Connection
'se crea el Objeto re (será el recordset)
Set rt = New ADODB.Recordset

CON.CursorLocation = adUseClient
'Aquí has de canbiar el UID (mysql) y el PASSWORD (palam) por los tuyos (de mysql)
CON.Open "DRIVER={MySQL ODBC 3.51 Driver};DATABASE=rm;SERVER=172.16.7.136;UID=mysql; PASSWORD=palam;PORT=3306;"


strSQL =  "instrucción SQL que quieras"

'en este momento el recordset (rt) se llena
rt.Open strSQL, CON

'a partir de aquí puedes empezar a trabajar con el recordset (rt)

End Sub

Creo que más ya no puedo ayudarte. Si tienes alguna duda más hazla, pero que sea más específica.