Hello all,
I am trying to place validation on my datatables columnChanging event
however the problem I am encountering is that the datasets.column value lags,
that is, the first time the event runs its the old value, the second time
round its the changed value....
Should I be using the columnchanged event instead? or could this be
something to do with my binding source?
Below is my code;
Private Sub me_ColumnChangi ng(ByVal sender As System.Object, ByVal e As
System.Data.Dat aColumnChangeEv entArgs) Handles Me.ColumnChangi ng
Dim myErrorValidato r As New BL.clsErrorVali datorDataTable
Dim myRow As BL.dsBMS.tblSet tingsDefaultsRo w
myRow = CType(e.Row, BL.dsBMS.tblSet tingsDefaultsRo w)
myRow.ClearErro rs()
myErrorValidato r.Validate_Stri ngEmpty(myRow,
Me.defaultAdmin FeePercentageCo lumn, "Cant be an empty string dude")
myErrorValidato r.Validate_Deci malBetween(myRo w,
Me.defaultAdmin FeePercentageCo lumn, 0, 1, "Enter a valid percentage value")
myErrorValidato r.Validate_Stri ngEmpty(myRow,
Me.defaultMarke tingFeePercenta geColumn, "Cant be an empty string dude")
myErrorValidato r.Validate_Deci malBetween(myRo w,
Me.defaultMarke tingFeePercenta geColumn, 0, 1, "Enter a valid percentage
value")
myErrorValidato r.Validate_Stri ngEmpty(myRow,
Me.defaultTeleF eePercentageCol umn, "Cant be an empty string dude")
myErrorValidato r.Validate_Deci malBetween(myRo w,
Me.defaultTeleF eePercentageCol umn, 0, 1, "Enter a valid percentage value")
End Sub
Thank you kindly for any ideas
John Sheppard
I am trying to place validation on my datatables columnChanging event
however the problem I am encountering is that the datasets.column value lags,
that is, the first time the event runs its the old value, the second time
round its the changed value....
Should I be using the columnchanged event instead? or could this be
something to do with my binding source?
Below is my code;
Private Sub me_ColumnChangi ng(ByVal sender As System.Object, ByVal e As
System.Data.Dat aColumnChangeEv entArgs) Handles Me.ColumnChangi ng
Dim myErrorValidato r As New BL.clsErrorVali datorDataTable
Dim myRow As BL.dsBMS.tblSet tingsDefaultsRo w
myRow = CType(e.Row, BL.dsBMS.tblSet tingsDefaultsRo w)
myRow.ClearErro rs()
myErrorValidato r.Validate_Stri ngEmpty(myRow,
Me.defaultAdmin FeePercentageCo lumn, "Cant be an empty string dude")
myErrorValidato r.Validate_Deci malBetween(myRo w,
Me.defaultAdmin FeePercentageCo lumn, 0, 1, "Enter a valid percentage value")
myErrorValidato r.Validate_Stri ngEmpty(myRow,
Me.defaultMarke tingFeePercenta geColumn, "Cant be an empty string dude")
myErrorValidato r.Validate_Deci malBetween(myRo w,
Me.defaultMarke tingFeePercenta geColumn, 0, 1, "Enter a valid percentage
value")
myErrorValidato r.Validate_Stri ngEmpty(myRow,
Me.defaultTeleF eePercentageCol umn, "Cant be an empty string dude")
myErrorValidato r.Validate_Deci malBetween(myRo w,
Me.defaultTeleF eePercentageCol umn, 0, 1, "Enter a valid percentage value")
End Sub
Thank you kindly for any ideas
John Sheppard