Buenos días:


Tengo una duda, que seguro que es una tontería:


tengo una base de datos access con 10 registros y el ultimo registro en el campo "CODPRODUCTO" tiene almacenado 99, yo quiero que me lea ese registro y le sume 1 para el siguiente registro, y esto es lo que tengo:


[color=#0000ff size=2]Dim[/color] Total [color=#0000ff size=2]As[/color] [color=#0000ff size=2]Integer[/color] = ContReg.Count [color=#008000 size=2]'total registros[/color]


[color=#0000ff size=2]Dim[/color] OTRO [color=#0000ff size=2]As[/color] [color=#0000ff size=2]Integer[/color]


[color=#0000ff size=2]Dim[/color] FILA [color=#0000ff size=2]As[/color] DataRow = DataSet1.Tables([color=#800000 size=2]"PRODUCTOS"[/color]).Rows(0)


OTRO = FILA.Item([color=#800000 size=2]"CODPRODUCTO"[/color]) + 1


Label1.Text = OTRO


como puedo ver el ultimo registro y sumarle 1,


Muchisimas gracias. Saludos.

[color=#0000ff size=2]Dim[/color] Total [color=#0000ff size=2]As[/color] [color=#0000ff size=2]Integer[/color] = DataSet1.Tables([color=#800000 size=2]"PRODUCTOS"[/color]).Rows.Count [color=#008000 size=2]'total registros[/color]


[color=#0000ff size=2]Dim[/color] OTRO [color=#0000ff size=2]As[/color] [color=#0000ff size=2]Integer[/color]


[color=#0000ff size=2]Dim[/color] FILA [color=#0000ff size=2]As[/color] DataRow = DataSet1.Tables([color=#800000 size=2]"PRODUCTOS"[/color]).Rows(Total-1)


OTRO = FILA.Item([color=#800000 size=2]"CODPRODUCTO"[/color]) + 1


Label1.Text = OTRO