Buenos días
En una tabla estoy intentado grabar un registro mediante el siguiente código:
Dim reg As DataRow
Dim fs As New FileStream(OpenFileDialog1.FileName, FileMode.OpenOrCreate, FileAccess.Read)
Dim MyData(fs.Length) As Byte
fs.Read(MyData, 0, fs.Length)
fs.Close()
reg = Me.DataSet801.Tables("archivo").NewRow()
reg.Item("cod_nov") = Me.DataGrid3.Item(Me.DataGrid3.CurrentRowIndex, 0)
reg.Item("cod_archivo") = 5
reg.Item("larchivo") = "c:controger" + archivo2
reg.Item("imagen") = MyData
Me.DataSet801.Tables("archivo").Rows.Add(reg)
Me.OleDbDataAdapter21.Update(DataSet801.Tables("ar chivo"))
Me.DataSet801.AcceptChanges()
El mensaje de error que me esta presentando es el siguiente:
Additional information: Update requires a valid InsertCommand when passed DataRow collection with new rows.
Les agradezco la ayuda que puedan brindarme al respecto
Gracias
Carlos
