Para la cadena de conexión que estás utilizando instalaste MySQLProv?
Si es que no lo hiciste entonces no funcionará:
http://www.mysql.com/downloads/downl...xe&pick=mirror
La dirección que te dí anteriormente es la del provider ado.net específico para MySQL (no oledb), si lo instalaste busca en la documentación MySqlConnection. El código de conexión sería más o menos así (necesitas agregar una referencia a MySQL.dll dependiendo de la versión del .net framework):
Código:
Dim dr As MySqlDataReader
Try
Dim com As New MySqlCommand("select * from guia_paises", New MySqlConnection("uid=usuario;pwd=pass;database=nombrebd;"))
com.Connection.Open()
dr = com.ExecuteReader(CommandBehavior.CloseConnection)
Console.WriteLine("Código" & vbTab & "Nombre")
While dr.Read
Console.WriteLine(dr("codpais") & vbTab & dr("nompais"))
End While
Catch ex As Exception
Console.WriteLine("Error: " + ex.Message)
Finally
If Not dr Is Nothing Then
dr.Close()
End If
End Try