Το γέμισες το dataset από τη βάση; ή και την προηγούμενη τιμή την είχες καρφώσει με το χέρι; Γιατί σε αυτή την περίπτωση η παλιά τιμή δεν πάει στο original version αλλά απλά χάνεται. Κοίτα αυτό:
Dim NewRow As Dataset1.CategoriesRow
NewRow = Dataset11.Categories.NewCategoriesRow
NewRow.CategoryName = "Old name"
Dataset11.Categories.AddCategoriesRow(NewRow)
Dataset11.AcceptChanges()
Dataset11.Categories(0).CategoryName = "New Name"
Dim dr As DataRow = Dataset11.Tables("Categories").Rows(0)
Label1.Text = "current" & dr("CategoryName", DataRowVersion.Current)
Label2.Text = "current" & dr("CategoryName", DataRowVersion.Original)
Εδώ γεμίσω το dataset με το χέρι, αλλά στο acceptchanges το dataset θα είναι σαν να το πήρα από τη βάση (δηλαδή η τιμή που έδωσα στο field θα πάει manualy να κάτσει στο original version). Το ίδιο αποτέλεσμα θα έχεις αν το γεμίσεις με select, η τιμή θα σου έρθει στο original version.
Χρήστος Γεωργακόπουλος