Siguiendo las instrucciones de varias páginas dedicadas a Visual Basic, he conectado mi programa con MySQL así (o al menos lo he intentado):
Código vb:
(evidentemente donde pone "campos", "tabla", "usuario" y "*****" van mis datos en la versión original)Ver original
Dim strSQL As String conexionBD = New OdbcConnection("dsn=" & _ "conexion_vb" & ";uid=" & _ "usuario" & ";pwd=" & _ ****** & ";") MsgBox("1") strSQL = "SELECT campos FROM tabla ORDER BY campo1" Dim command As New OdbcCommand(strSQL, conexionBD) Dim reader As OdbcDataReader = command.ExecuteReader() While reader.Read() ListBox3.Items.Add(reader.GetString(0)) MsgBox(reader.GetString(0)) MsgBox(reader.GetString(1)) End While reader.Close() End Sub
Qué puede estar fallando? No me agrega nada al ListBox :S