| Usuario |
Recuperar campo autonumérico al in... |
Desconocido
|
| Enviado - 17/5/2004 |
| |
Necesito saber como puedo recuperar el campo autonumérico de una base de datos al insertar el registro.
Ej:
ID Autonumerico ()
Autor Texto Vela
Precio Moneda 22
Gracias de antemano
|
| |
|
Desconocido
|
| Enviado - 1/9/2004 |
| |
Hola,
Para recuperar el Id de un registro Autonumérico solo debes recogerlo en un variable una vez hagas corras el metodo update, ejm:
Dim rcd_recordset as New ADODB.Recordset
Dim conn_bd as New ADODB.Connection
Dim int_nuevo_index AS Long
' conn_bd - Estableces la conn a la BD
With rcd_recordset
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "[tabla]", conn_bd, , , adCmdTable
.AddNew
.Fields("nombre_registro_1") = "Cristian"
.Fields("nombre_registro_2") = "2"
...
...
.Update
int_nuevo_index = .Fields("nombre_id")
.Close
End With
Espero te sirva.
Saludos,
CG.- |
| |
|
|
|
