VB6.0 SP6 y MySQL

[edjosephgr]

Muchas gracias amigo, la verdad me funciono perfecto, y logre cargar los datos.
No Obstante me declaro ignorante en esto. siempre he usado el controldata y esto es bastante diferente.

Espero me puedas continuar ayudando, te agradeceria mucho si ahora me puedes explicar, como hago para vincular con campos: por ejemplo yo hice esto despues del codigo que me dejastes del load del formulario:

Label1.Caption = res.Fields("id")
Text1.Text = res.Fields("tlf")
Text2.Text = res.Fields("msj")
Check1.Value = res.Fields("stad")

y bien, en los campos me salen los datos, PEEERO hice un boton que le puse:

Private Sub Command1_Click()
On Error GoTo fail
res.MoveNext

fail:
If Err.Number = "3021" Then
res.Requery
End If
End Sub

Esto hace que se mueva al siguiente registro, perfecto en el datagrid se ve que el registro se mueve, y cuando llega al ultimo que no consigue mas, se carga de nuevo y no da el error 3021 (H) jejeje ingenioso xD el problema esta que en los text no se mueve :(

Otra cosita si no es mucho exigir jejeje.. necesito es modificar el campo stad que carga en el check1 (la consulta carga solo los q valen cero (0)) que cuando tenga dicho registro activo, tildar el check y que lo guare (osea q el campo stad de ese registro se cambie a 1 en la db)

Gracias de antemano men.