Ayuda con vb2008 y mysql

[IronBuho]

wenas


he pensado de hacer un juego tipo ogame pero mediante un launcher programado por VB. Lo que sucede esq no tengo la referencia/conector y el codigo para conectar el vb2008 a un mysql.
Alguien sabe como hacerlo y de donde sacar la referencia/conector??

[Isdiar]

Puedes mirar esta web: http://www.connectionstrings.com

Ahí encuentras las cadenas de conexión para todas las Bases de datos!

Un saludo, espero que te sirva! ;)

[IronBuho]

pues me sigue pasando lo mismo T.T

me e instalado e connector 6.0.3 mysql creo q es y e puesto esto:
Server=myServerAddress;Port=1234;Database=myDataBa se;Uid=myUsername;Pwd=myPassword;
q es lo q se tiene q poner y me dice:

No se ha declarado el nombre 'Server'
No se ha declarado el nombre 'myServerAddress'
El caracter no es valido

[Isdiar]

Claro, date cuenta que deberás modificar la información de la cadena de conexión por la información correspondiente en tu equipo.

Debes modificar el nombre del servidor (myServerAddress), el puerto de conexión (Port), el nombre de la base de datos (Database), el usuario (Uid) y la contraseña de este usuario (myPassword)...

[IronBuho]

no pero esq modificandola me dice lo mismo, el q pasa esq el connector no define el nombre servidor

[Isdiar]

Ni idea amigo... :S

[Adolfiten]

Yo cuando programo .NET contra MySQL utilizo una DLL que provee MySQL para hacer todo lo que a conexión se refiere, ¿no probaste por ese lado?

Estaría bueno ver cómo tenés el código en la parte donde intentás establecer la conexión con el servidor de base de datos.

Saludos.

[culd]

Mira capo, yo comence a utilizar el conector que provee MYSQL, pude conectarlo pero no se como crear un RECORSET para cargar una consulta... Ya cree dos post y nadie sabe, y las respuestas son cualquier cosa nada que ver con lo que pregunto... Te dejo la forma de crear la conexion y conectarte, si encontras como crear un recorset para el conector que provee MySQL por favor mandame un mensaje privado

*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-**-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*

Variable publica para el form (la que va a manejar la conexion)

Código:

Dim Con As MySql.Data.MySqlClient.MySqlConnection

En el Form_Load inicializo el objeto

Código:

Con = New MySql.Data.MySqlClient.MySqlConnection()

Conexion con el servidor

Código:

Con.ConnectionString = "server=" & "localhost" & ";" _
& "user id=" & "root" & ";" _
& "password=" & "12345" & ";" _
& "database=prueba"
        Try
            Con.Open()
        Catch ex As MySql.Data.MySqlClient.MySqlException
            MsgBox(ex.Message.ToString)
            Exit Sub
        End Try
        MsgBox("Se realizo la conexion")

*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-**-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*

Repito, si encontras como generar un RECORSET para el conector que provee MYSQL, y que funcione con esa conexion, NO DUDES EN AVISARMA

[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ón de consultas SQL VB por Adolf:

Public 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.

[culd]

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&#243:

Public 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)

[Adolfiten]

Con DataRow, así:

Código VB:

Dim unaFila As DataRow
For Each unaFila In Ds.Tables(0).Rows
    'INSTRUCCIONES
Next
 

Revolvé en las FAQ's de .NET que de seguro encontrás algo útil.

Saludos.

[culd]

Iniciado por Adolfiten

Con DataRow, así:

Código VB:

Dim unaFila As DataRow
For Each unaFila In Ds.Tables(0).Rows
    'INSTRUCCIONES
Next
 

Revolvé en las FAQ's de .NET que de seguro encontrás algo útil.

Saludos.

Muchas gracias, ahora si complete lo que necesitaba....

PD: La verdad cambio mucho la forma con respecto a la 6.0 (me gustaba mas antes)