Programación de Datagridview
Fíjate que tengo una consulta y es la siguiente:
Estoy trabajando en el desarrollo de una aplicación de visual basic 2008 con una conexión a una base de datos de Access 2007 con OleDB ahora tengo un formulario que carga la información de una tabla llamada "Coberturas Fijas Autos" y tiene los siguientes campos:
Código de Identificación, Nombre de Cobertura, Suma Asegurada, Porcentaje, Monto.
Bueno en este formulario me carga toda esta información, pero ahora quiero que cuando la cargue el usuario pueda modificar la información en el Datagridview y le de Guardar cambios pero estos cambios se almacenan en otra tabla llamada "Coberturas Aplicadas Autos" y quiero saber como hacer esto guardar el datagridview en una nueva tabla tengo un código ya que me sirve a medias te muestro el código:
For i = 0 To DataGridView1.Rows.Count - 1
Dim cnn As New OleDb.OleDbConnection
Dim dt As New DataTable
Dim da As New OleDb.OleDbDataAdapter
Dim cmd As New OleDb.OleDbCommand
cnn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source= C:\Users\Galvez\Desktop\ADSC.accdb; Persist Security Info=False"
cnn.Open()
cmd.Connection = cnn
cmd.CommandText = "INSERT INTO [Coberturas Aplicadas Autos] VALUES ('" + DataGridView1.Rows(i).Cells(0).Value.ToString + "','" + DataGridView1.Rows(i).Cells(1).Value.ToString + "', '" + DataGridView1.Rows(i).Cells(2).Value.ToString + "', '" + DataGridView1.Rows(i).Cells(3).Value.ToString + "', '" + DataGridView1.Rows(i).Cells(4).Value.ToString + "', '" + Ingreso_poliza_auto.TextBox10.Text + "', '" + Ingreso_poliza_auto.TextBox11.Text + "', '" + Ingreso_poliza_auto.TextBox12.Text + "')"
cmd.ExecuteNonQuery()
cmd.CommandType = CommandType.TableDirect
da.SelectCommand = cmd
cnn.Close()
Next
Pero este codigo solo me guarda hasta DataGridView1. Rows(i). Cells(4).Value.ToString ya lo demas no me lo guarda porque me dice que tengo que declarar un objeto con new o algo asi este codigo lo saque de este link
Pero igual ese ejemplo no me funciona.
Estoy trabajando en el desarrollo de una aplicación de visual basic 2008 con una conexión a una base de datos de Access 2007 con OleDB ahora tengo un formulario que carga la información de una tabla llamada "Coberturas Fijas Autos" y tiene los siguientes campos:
Código de Identificación, Nombre de Cobertura, Suma Asegurada, Porcentaje, Monto.
Bueno en este formulario me carga toda esta información, pero ahora quiero que cuando la cargue el usuario pueda modificar la información en el Datagridview y le de Guardar cambios pero estos cambios se almacenan en otra tabla llamada "Coberturas Aplicadas Autos" y quiero saber como hacer esto guardar el datagridview en una nueva tabla tengo un código ya que me sirve a medias te muestro el código:
For i = 0 To DataGridView1.Rows.Count - 1
Dim cnn As New OleDb.OleDbConnection
Dim dt As New DataTable
Dim da As New OleDb.OleDbDataAdapter
Dim cmd As New OleDb.OleDbCommand
cnn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source= C:\Users\Galvez\Desktop\ADSC.accdb; Persist Security Info=False"
cnn.Open()
cmd.Connection = cnn
cmd.CommandText = "INSERT INTO [Coberturas Aplicadas Autos] VALUES ('" + DataGridView1.Rows(i).Cells(0).Value.ToString + "','" + DataGridView1.Rows(i).Cells(1).Value.ToString + "', '" + DataGridView1.Rows(i).Cells(2).Value.ToString + "', '" + DataGridView1.Rows(i).Cells(3).Value.ToString + "', '" + DataGridView1.Rows(i).Cells(4).Value.ToString + "', '" + Ingreso_poliza_auto.TextBox10.Text + "', '" + Ingreso_poliza_auto.TextBox11.Text + "', '" + Ingreso_poliza_auto.TextBox12.Text + "')"
cmd.ExecuteNonQuery()
cmd.CommandType = CommandType.TableDirect
da.SelectCommand = cmd
cnn.Close()
Next
Pero este codigo solo me guarda hasta DataGridView1. Rows(i). Cells(4).Value.ToString ya lo demas no me lo guarda porque me dice que tengo que declarar un objeto con new o algo asi este codigo lo saque de este link
Pero igual ese ejemplo no me funciona.
Respuesta de daguiflo
1