Försöker med nedanstående kod ta data från en tabell och lägga i en ny rad i en annan tabell, problemet är att datat inte sparas permanent i tabellen, det finns i tabellen så länge som applikationen kör. Kan någon se vad jag missat är jag tacksam.
Eller om det finns ett bättre sätt att åstadkomma önskat resultat.


Dim Row As PartsDataSet.PumpRow
Row = CType(CType(Me.PumpBindingSource.Current, DataRowView).Row, PartsDataSet.PumpRow)

QuotePartsBindingSource.AddNew()
QuotePartsBindingSource.MoveLast()

Dim NewQuotePart As QuotesDataSet.QuotePartsRow
NewQuotePart = CType(CType(Me.QuotePartsBindingSource.Current, DataRowView).Row, QuotesDataSet.QuotePartsRow)

NewQuotePart.PartNumber = Row.PartNumber
NewQuotePart.ShortDescription = Row.ShortDescription
NewQuotePart.LongDescription = Row.LongDescription

Me.ValidateChildren()
Me.QuotePartsBindingSource.EndEdit()
Me.QuotesTableAdapterManager.UpdateAll(Me.QuotesDataSet)

Har nu testat med att spara data i en enkel tabell i en accessdatabas och det fungerar inte med oledb koppling, har provat med odbc och då går det att spara data....

Problemet är löst, man måste ändra från copy always till copy if newer på den lokala databsen.