17/10/2012, 20:40
|
 | | | Fecha de Ingreso: marzo-2012
Mensajes: 383
Antigüedad: 13 años, 1 mes Puntos: 61 | |
| Respuesta: Access + VB .net
42. Dim cmd_select = "select @@identity"
43. comando = New OleDbCommand(cmd_select, conexion)
44. Dim dt = New DataTable()
45. Dim da = New OleDbDataAdapter(comando)
46. da.Fill(dt)
47. Me.Codigo = Convert.ToInt32(dt.Rows(0)(0)) 'Obtengo el valor y se lo asigno al atributo Codigo.
51. conexion.Close()
54. Return Me.Codigo
Mira la instrucción select @@identity lo que haces es recuperar el valo generado por un campo numérico(identity) a la hora de hacer un insert a la tabla, como cuando tenes un campo autonumerico cuando haces el insert a la tabla este campo se genera automáticamente entonces esa instrucción te sirve para recuperar ese valor.
Me.Codigo = Convert.ToInt32(dt.Rows(0)(0)) aquí me imagino que es donde esta recuperando ese valor del campo autonumerico y lo asigna a la variable Me.Codigo yo esto lo hago de otra forma no se aqui como estén trabajando.
Y al final lo que hace es retornar ese valor Return Me.Codigo |