Recuperar o cargar el último registro insertado

09/02/2007 - 18:39 por gambini | Informe spam
Hola a todos. Su ayuda, por favor.
Necesito recuperar o cargar en un dataset o datatable(lo que más convenga)
el ULTIMO REGISTRO insertado en una Base de Datos física. Más
específicamente, me intereza el valor del Id de dicho registro, lo cual es
autoincremental.
Saludos
 

Leer las respuestas

#1 Roberto Roccha
09/02/2007 - 21:32 | Informe spam
Estimado Gambini:

Puedes probar lo sigiuente:

Asumamos que tenemos una base de datos llamada Inventario y una Tabla
llamada orden:

Dim StrCnn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\Inventario\Inventario.mdb;Persist Security Info=False"
Dim StrSQl As String = "SELECT * FROM Orden"
Dim da As OleDbDataAdapter = New OleDbDataAdapter(StrSQl, StrCnn)
Dim dt As DataTable
' Crear los comandos de insertar, actualizar y eliminar
Dim cb As New OleDbCommandBuilder(da)
' Como hay campos con caracteres especiales,
' al usarlos incluirlos entre corchetes.
cb.QuotePrefix = "["
cb.QuoteSuffix = "]"
' Asignar los comandos al DataAdapter
' (se supone que lo hace automáticamente, pero...)
da.UpdateCommand = cb.GetUpdateCommand
da.InsertCommand = cb.GetInsertCommand
da.DeleteCommand = cb.GetDeleteCommand
'
' Esta base de datos usa el ID con valores automáticos
da.MissingSchemaAction = MissingSchemaAction.AddWithKey
'
dt = New DataTable
' Llenar la tabla con los datos indicados
da.Fill(dt)
Dim dr As DataRow
Dim nPos As Integer
' Obtenemos la posición del Registro, la que quieres el ultimo registro
nPos = dt.Rows.Count
dr = dt.Rows(nPos)
Dim id As Integer = dr("Id")
' Y con esto creo que obtienes la informacion que requieres
Espero que te sirva

saludos

Roberto
"gambini" wrote:

Hola a todos. Su ayuda, por favor.
Necesito recuperar o cargar en un dataset o datatable(lo que más convenga)
el ULTIMO REGISTRO insertado en una Base de Datos física. Más
específicamente, me intereza el valor del Id de dicho registro, lo cual es
autoincremental.
Saludos

Preguntas similares