Ver Mensaje Individual
  #7 (permalink)  
Antiguo 30/10/2007, 01:45
sergi_climent
 
Fecha de Ingreso: enero-2005
Ubicación: Barcelona
Mensajes: 1.473
Antigüedad: 20 años, 2 meses
Puntos: 10
Re: Conexion y consulta MySQL con VB 6.0

Cita:
Iniciado por shadowGT Ver Mensaje
hey puedes poner un ejemplo detallando un opoco mas esta parte
gracias
Código:
'esta es la consulta SQL a tu tabla, donde sacaremos los datos
strMySql = "SELECT * FROM tabla"
'creamos el recordset (hacemos la consulta)
rsMySql .Open strMySql , conexionadoMySql
'Esta linia la pongo para q me mueva el puntero siempre al primer valor
'me he encontrado alguna vez con algun error y con esto lo he solucionado
If Not rsPC.EOF Then rsPC.MoveFirst
'Bucle - Recorremos todo el recordset hasta el final, y dentro de esto extraeremos los resultados
While Not rsMySql.EOF
' aqui accedes al recordset(a los datos q quieres sacar de tu consulta SQL)
campo= rsMySql!campo
campo1=rsMysql!campo1
campo2=rsMysql!campo2

{...} 'Aqui puedes tener varias opciones todo depende de lo q necesites
'Con lo datos opctenidos podrias hacer un update o un insert a una tabla o bien 
'mostrar los resultados en una grid... eso depende de lo q quieras

'Avanzamos el puntero al siguiente registro
rsMySql.MoveNext
Wend 'Cerramos wl While
rsMySql.Close 'Cerramos el Recordset
closeado ' Cerramos la conexion
End Sub
no ser si asi queda mas claro.... si tienes alguna duda concretala un poquito mas.

Saludos
__________________
"Cada hombre es el hijo de su propio trabajo"
Miguel de Cervantes Saavedra
"La experiencia es algo que no consigues hasta justo depués de necesitarla"
Laurence Olivier