Foros del Web - Recuperar un autonumerico de una BD ACCESS

Foros del Web (http://www.forosdelweb.com/)

- ASP Clásico (http://www.forosdelweb.com/f15/)

- - Recuperar un autonumerico de una BD ACCESS (http://www.forosdelweb.com/f15/recuperar-autonumerico-bd-access-573386/)

Recuperar un autonumerico de una BD ACCESS

Hola amigos foreros, tengo un problemo necesito recuperar un campo autonumerico cuando realizo un insert, el problema q no se como hacerlo en access. Me copie un codigo utilizando @@IDENTITY pero solo funciona en sql 2000. Ahi dejo mi codigo haber si alguien me puede ayudar.( o si tienen algun ejemplo de donde guiarme)
Gracias por la ayuda

DECLARE @Identidad numeric
insert into Registro(Reg_Gerencia, Fecha_Ingreso, NumDoc, Documento, Fecha_Documento, NumDpto, NumDiv, NumSec, Remitente, Asunto, Observaciones, NumEstado, NumDestino, NumRpta, Respuesta, NumArchivo, STD) values (45,'07/04/2008',2,'546','08/04/2008',1100,0,0,'546','546','',0,0,0,'',0,0);
SELECT @Identidad = @@IDENTITY

Quisiera que cuando haga el insert me retorne el valor del autonumerico q en mi caso esta en el campo id_registro

Re: Recuperar un autonumerico de una BD ACCESS

:pensando: access....

Código PHP:

   set rs = server.createobject("ADODB.Recordset")
RS.addnew
    rs.Fields.Item("Reg_Gerencia").value =45
    rs.Fields.Item("Fecha_Ingreso").value ='07/04/2008'
    rs.Fields.Item("NumDoc").value =2
    rs.Fields.Item("Documento").value ='546'
    rs.Fields.Item("Fecha_Documento").value ='08/04/2008'
    rs.Fields.Item("NumDpto").value =1100
    rs.Fields.Item("NumDiv").value =0
    rs.Fields.Item("NumSec").value =0
    rs.Fields.Item("Remitente").value ='546'
    rs.Fields.Item("Asunto").value ='546'
    rs.Fields.Item("Observaciones").value =''
    rs.Fields.Item("NumEstado").value =0
    rs.Fields.Item("NumDestino").value =0
    rs.Fields.Item("NumRpta").value =0
    rs.Fields.Item("Respuesta").value =''
    rs.Fields.Item("NumArchivo").value =0
    rs.Fields.Item("STD").value =0
RS.updatebatch
numero = int(rs.Fields.Item("index").value)
response.Write "Registro numero = " & numero

me pregunto... servira???