Visual Basic .NET
|
Autor |
Discusión:
Actualizar una base de datos access desde bindingsource |
|
sadar2
|
Actualizar una base de datos access desde bindingsource
Enviado:
Tuesday, August 09, 2011 4:53 PM (UMST)
|
|
hola a todos, era programador de vs6 y ahora quiero reciclarme al Vs .net exactamente la version 2010. Por lo que leo el tema de Ado para acceder a bases de datos a cambiado muchisimo y estoy un poco perdido.
Ya hago conexiones a bases de datos y accedo a la informacion que quiero, ejemplo:
Dim DireccionBD As String
Dim cnn As New OleDb.OleDbConnection
Dim dt As New DataTable
Dim da As New OleDb.OleDbDataAdapter
Dim ds As New DataSet
Dim cmd As New OleDb.OleDbCommand
'control de movimiento del dataadapter
Dim bs As New BindingSource
'Creamos la ruta de la bd
DireccionBD = Application.StartupPath + "\HARDZONE.accdb"
'abro la conexion con la bd
'cnn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & DireccionBD & ";Persist Security Info=False"
cnn.Open()
'creo el comando de ataque y lleno la tabla empleados
cmd.Connection = cnn
cmd.CommandText = "Select * from clientes"
cmd.CommandType = CommandType.TableDirect
da.SelectCommand = cmd
da.MissingSchemaAction = MissingSchemaAction.AddWithKey
da.Fill(ds, "clientes")
da.Fill(dt)
'enlazamos el bingding navigator
bs.DataSource = dt 'asociamos la tabla al BS
' Enlazamos el control BindingNavigator al control BindingSource
BN1.BindingSource = bs
' enlazamos el control DataGridView al control BingdingSource
DataGridView1.DataSource = bs
'ahora enlazo los textboxes al bs (bindingsource)
TextBox1.DataBindings.Add("Text", bs, "NOMBRE")
TextBox2.DataBindings.Add("Text", bs, "APELLIDOS")
TextBox3.DataBindings.Add("Text", bs, "DNI")
'PULSO EL BOTON AÑADIR REGISTRO
bs.AddNew()
'PULSO EL BOTON ACEPTAR REGISTRO NUEVO
Me.Validate()
Me.bs.EndEdit()
HASTA AQUI GENIAL, EL PROBLEMA VIENE CUANDO QUIERO
ACTUALIZAR LA BASE DE DATOS ORIGINAL CON ESTA INFORMACION QUE ACABO DE AÑADIR.
PONGO EL SIGUIENTE CODIGO PERO NADA, NO HACE NADA
Me.da.Update(Me.ds, "clientes")
Por favor a ver si alguien me puede hechar una mano, gracias por adelantado.
|
|
|