Ver Mensaje Individual
  #10 (permalink)  
Antiguo 07/05/2009, 10:37
Avatar de culd
culd
 
Fecha de Ingreso: noviembre-2003
Mensajes: 959
Antigüedad: 20 años, 6 meses
Puntos: 19
Respuesta: Ayuda con vb2008 y mysql

Cita:
Iniciado por Adolfiten Ver Mensaje
¿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&#243:
Ver original
  1. Public Function EjecutarSQL(ByVal CadenaConsulta As String) As DataSet
  2.             If Not CadenaConsulta = String.Empty Then
  3.                 Dim unaC As MySqlConnection = Me.Conectar
  4.                 Dim unDs As New DataSet, unDA As MySqlDataAdapter
  5.                 Try
  6.                     unaC.Open()
  7.                     unDA = New MySqlDataAdapter(CadenaConsulta, unaC)
  8.                     Dim unCB As MySqlCommandBuilder = New MySqlCommandBuilder(unDA)
  9.  
  10.                     unDA.Fill(unDs)
  11.                     unaC.Close()
  12.                     Return unDs
  13.                 Catch
  14.                     MessageBox.Show(Err.Description & " - " & Err.Source & " Línea: " & Err.Erl)
  15.                 End Try
  16.             End If
  17.             Return Nothing
  18. 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)