Cita:
Iniciado por Adolfiten
¿Lo que precisás no será un
DATASET?
Yo utilizo esta función para hacer consultas de manera más fácil:
Código Funció:
Ver originalPublic Function EjecutarSQL(ByVal CadenaConsulta As String) As DataSet
If Not CadenaConsulta = String.Empty Then
Dim unaC As MySqlConnection = Me.Conectar
Dim unDs As New DataSet, unDA As MySqlDataAdapter
Try
unaC.Open()
unDA = New MySqlDataAdapter(CadenaConsulta, unaC)
Dim unCB As MySqlCommandBuilder = New MySqlCommandBuilder(unDA)
unDA.Fill(unDs)
unaC.Close()
Return unDs
Catch
MessageBox.Show(Err.Description & " - " & Err.Source & " Línea: " & Err.Erl)
End Try
End If
Return Nothing
End Function
Funciona con la DLL provista por MySQL, espero te sirva de algo.
Saludos gente.
Como se recorre el dataset, es decir... teoricamente ya conecto y realizo la consulta... como recorro los campos y filas del dataset (como se hacia en recorset en ADO con VB 6.0)