Roland,

I think it's been mentioned here before that it's better to add a row with the Table's NewRow() method than with the BindingContext's AddNew() method. So, you'd do something like this (remember, I use C#, so my VB syntax may be slightly off):

  DataRow row = ds.Tables[0].NewRow()
  ds.Tables[0].Rows.Add(row)
  BindingContext(ds, "Listing").Position = ds.Tables[0].Rows.Count

~~Bonnie


>Hi,
>
>When the following code is executed I get an error message:
>
>There is no row at position.
>
> 'Add a New Record
> Me.Pending01_DS1.Listing.Clear()
> Me.BindingContext(Pending01_DS1, "Listing").AddNew()
>
> ' Defaults for New Listing in Table
> Dim iAddCurrRow As Integer
> iAddCurrRow = Me.BindingContext.Pending01_DS1, "Listing").Position
> Me.Pending01_DS1.Tables("Listing").Rows(iAddCurrRow).Item("DateInsert") = Now
>
>Where is the row I just added with AddNew command?
>
>What do I need to do to correct this error?
>
>Thanks
>Roland