ggm78
11 de Septiembre del 2003

Estoy intentando conectar una base de datos de MySQL desde Visual Basic .net. He leido los mensajes posteados pero no he conseguido que funcione. Me he instalado el driver del MyOLEDB y el del MySQLODBC. He probado con los dos y con el segundo es imposible y con el de MyOLEDB parece que si se conecta pero no guarda los cambios en la BD. Alguien podría mandarme algún codigo de ejemplo, remito el mio.

strConn = "Provider=MySqlProv.3.0;Data Source=myodbc3-prueba;DSN=prueba;Integrated Security="";Password="";User ID=root;Location=localhost;"

OleDbConnection1.Open()

strSelect = "SELECT * FROM empleado"
dbDataAdapter = New OleDbDataAdapter(strSelect, strConn)

dbDataSet = New Data.DataSet()
Dim commandBuilder As New Data.OleDb.OleDbCommandBuilder(dbDataAdapter)

dbDataAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey
dbDataAdapter.Fill(dbDataSet, "empleado")

dbDataTable = dbDataSet.Tables("empleado")

Dim row As DataRow = dbDataTable.NewRow
row = dbDataTable.Select("name = 'Gabri'")(0)
row.Delete()
'row("name") = "Jose"
'row("dni") = "233412343A"
'dbDataTable.Rows.Add(row)
dbDataSet.AcceptChanges()
dbDataAdapter.Update(dbDataSet, "empleado")
OleDbConnection1.Close()

melvin
11 de Septiembre del 2003

creo que esta bien tu codigo pero le faltaria antes de hacer el update que coloques
dataadapter.deletecommand=commandbuilder.Getdeletecommand

dataadapter.updatecommand=commandbuilder.Getupdatecommand

dataadapter.insertcommand=commandbuilder.Getinsertcommand

esto para realizar automaticamente las funciones del update, espero que te sirva de algo chao

Gonpas
11 de Septiembre del 2003

te acoinsejo que trates con uno de estos compnenetes, yo lo hice así y me funcionó sin problemas...
http://crlab.com/
saludos...