Problema con INSERT MySQL y VB.net (2003 y 2010)

Iniciado por Dreamcacher, 27 Enero 2012, 00:58 AM

0 Miembros y 1 Visitante están viendo este tema.

Dreamcacher

Bueno pues la cosa es que llevo con un proyecto y he estado trabajando con VB.net 2003 y una base de datos MySQL, he llegado a fucnioanar, hacer querys, devolver datos, y hacer comprobaciones, pero a la hora de hacer un INSERT, o grabar una nueva fila en una tabla y no consigo nada, he probado bastantes formas, o al meno no pillo todavía bien como funciona, pero no logro nada.

Principalmente preferiría trabajar con vb.net 2003, ya que el proyecto es de 2003 y ahora mismo lo he portado a 2010, por el tema de que tal vez con drivers mas actualizados, seria mas sencillo.

Lo perfecto seria poder hacerlo todo mediante lenguaje SQL, con una query INSERT, al estilo PHP, existe alguna forma ce hacerlo así?

sino, si pueden pasarme alguna sencilla, y que este bien explicada, os lo agradecería.

Saludos y Gracias!


http://galeria.dreamcachersite.es/

...En este mundo existen tres tipos de personas, las que saben contar, y las que no...
[ Homer Simpsion ]

fran800m

Mírate el conector para .NET de MySQL

Con el ya instalado usas el SqlCommand

http://www.mysql.com/downloads/connector/net/

Dreamcacher

Ya estoy trabajando con el, en vb.net 2003, usaba el 1.0, pero pensando que igual funcionaba mejor versiones mas recientes, me he pasado a 2010, y la ultima versión de connector, consigo hacer conexiones a la base de datos y hacer Querys para rellenar un Data Adapter, pero no consigo hacer un código para hacer una Insert funcione, ya he estado buscando, y o no me ha funcionado, o no he conseguido adaptarlo para mi caso, así que si me pasáis algún ejemplo, lo agradecería ^^


http://galeria.dreamcachersite.es/

...En este mundo existen tres tipos de personas, las que saben contar, y las que no...
[ Homer Simpsion ]

Dreamcacher

ya he conseguido solucionar el problema.

Con el MySQL Connector instalado, y con las librerias importadas, vamos lo mismo que antes, este codigo...

Código (vbnet) [Seleccionar]


Public sub Insert(ByVal q As String, ByRef e As Boolean) As Boolean
        e=False
        Dim cad As String = "Database=ace;Data Source=localhost ;User Id=ace;Password=proyecto"
        Dim conex As New MySqlConnection(cad)
        Dim comandoSQL As New MySqlCommand(q, conex)
        Try
            conex.Open()
            comandoSQL.ExecuteNonQuery()
        Catch
            MsgBox("No se ha podido establecer una conexion con la base de datos." & vbCrLf & "Porfavor compruebe que tiene conexion a la red, o que sus conexiones no estan siendo bloqueadas por un firewall" & vbCrLf & "Si el Error persiste, porfavor contacte con el equipo de soporte tecnico.", MsgBoxStyle.Critical, "Error de Conexion con la base de datos")
            e = True
            Exit Function
        End Try
    End sub


Donde q, es una string que contiene la query a MySQL  y e una variable booleana, que se pasa por referencia y si devuelve true, es que existido algun error


http://galeria.dreamcachersite.es/

...En este mundo existen tres tipos de personas, las que saben contar, y las que no...
[ Homer Simpsion ]

Graphixx

Nada tiene fin solo hay pequeñas pausas, pausas que determinan el comienzo de otros. Graphixx
Mi blog