FatalErr
asked on
loop through all the DataRows in an array of data rows to update rows in a table
I'm trying to update multiple rows in a table with a common value in a field called ReferralID as per the code below.
Dim DocsRow() As Data.DataRow
DocsRow() = DsDocsRelDocs.Tables("DocsRelDocs").Select("ReferralID = " & ReferralID)
For Each DataRow In DocsRow()
DocsRow("SortedRelDocs") = SortedRelDocs
Next
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Try this:
DocsRow.AcceptChanges()'ad
For Each DataRow In DocsRow()
DocsRow("SortedRelDocs") = SortedRelDocs
Next
http://msdn.microsoft.com/en-us/library/system.data.datarow.acceptchanges.aspx