mysql y Visual Basic 2005

[riscking]

Aupi estoy empezando a manejar el visual basic 2005 y tengo un problemon y esque no consigo conectar y saber como hacer una consulta a la base de datos de mysql.

He instalado el ADODB y desde ahi me va perfecto.

En el formulario tengo puesto lo siguiente

Código:

   Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Recordset

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        
        Dim conectarse_mysql As String
        conectarse_mysql = "Driver={MySQL ODBC 3.51 Driver};Server=****;Port=3306;Option==131072 ;Stmt=;Database=test;Uid=root;Pwd=*****;"
        cn.ConnectionString = conectarse_mysql
        cn.Open()
        Dim strqry As String
        strqry = "select * from prueba where id=1"
        rs = cn.Execute(strqry)

    
    End Sub

Creo q conectar conecta pero no se como hacer la consulta, si alguien me puede completar algo o guiarme un poco se lo agradeceria. Almenos para ver algo en consola o en un cuadro de texto q esto es demasiado novedoso.
Gracias de antemano.

[Avellaneda]

Hola, si la conexión ha sido buena, para mostrar los datos del recordset p.e. en control DataGridView, puedes hacer lo siguiente:

Le agregas un Control BindingSource y un DataGridView y a continuación de la apertura del recordset, le pones éste código:

Código:

Dim oDa As OleDbDataAdapter = New OleDbDataAdapter
Dim oDs As New DataSet
oDa.Fill(oDs, rs, "prueba")
Me.BindingSource1.DataSource = oDs.Tables(0)
Me.DataGridView1.DataSource = Me.BindingSource1

Y eso es todo.-. Un saludo.

[riscking]

Avellaneda en primer lugar muchisimaas gracias por conestar.

EDITO: que funciona!!! increible!!!!

me puedes explicar un poco paso a paso que has hecho sino es molestia? para q es el bindingsource?

Gracias de nuevo

[Avellaneda]

Bueno, intentaré explicartelo paso a paso:

Primero creamos un objeto TableAdapter (El objeto TableAdapter proporciona comunicación entre la aplicación y la base de datos mediante instrucciones SQL o Procedimientos Almacenados).

A continuación creamos el DataSet para almacenar temporalmente los datos y poder mostrarlos en el DataGridView.

Cargamos ambos con los datos de la tabla que queremos mostrar y los enlazamos al BindingSource y éste al DataGrid.

El componente BindingSource sirve para enlazar un control a un origen de datos (sería como el control Adodc de VB6).

No es absolutamente necesario en este caso, ya que puedes enlazar directamente el DataGrid con el DataSet prescindiendo del BindingSource. Prueba con éste código y verás que funciona igual:

Código PHP:

  oDa.Fill(oDs, rs, "prueba") 
DataGridView1.DataSource = oDs.Tables(0)  
   

Un saludo

[ashely]

tengo la vercion vb6 y mysql6 de este foro obtube como hacer la coneccion pero tengo un problema para realizar consultas