Hay una variable global llamada @@identity, que contiene el numero identity generado mas recientemente.
 La podes consultar despues del insert.

 USE database
 SELECT @@identity

 Espero que te sirva de ayuda.
 Chau

 Chaine Carlos Daniel.


> -----Mensaje original-----
> De:    vb-rec@ccc.uba.ar [SMTP:vb-rec@ccc.uba.ar] En nombre de Alberto
> Perdomo
> Enviado el:    jueves 1 de octubre de 1998 8:37
> Para:    Lista de Visual Basic
> Asunto:    (VB-ESP) Como obtengo el último numero "identity" de un
> registro SQL Server
> Importancia:    Alta
>
> Hola,
>  
> Tengo varias tablas en SQL Server 6.5 con el tipo de datos "identity"
> (lo que es AutoNumber en Access) como llave primaria.  Quisiera saber
> cuál es la mejor forma para obtener el número de un registro recien
> ingresado,  o sea, tan pronto hago INSERT a la tabla quisiera saber
> cual fue el número generado para este registro.
>  
> En espera de sus comentarios,
>  
> Gracias,
>  
> Alberto.

Dim rstTest As Resultset

strSQLselect = "SET NOCOUNT ON " _ &
                         " INSERT INTO TEST (TEST_DESC) " & _
                         " VALUES ('Test1') " & _
                         " SELECT @@IDENTITY " & _
                         " SET NOCOUNT OFF"

Set rstTest = conConnect.OpenResultset(strSQLSelect, rdOpenKeyset)

MsgBox rstTest(0) ' Returns IDENTITY


---------------------------------------------------------------------
 Alberto Rodríguez Calvo (cittarc@usc.es)
 Centro de Innovación e Transferencia de Tecnoloxia (CITT)
 Universidade de Santiago de Compostela
 Páxina Web do CITT: http://www.usc.es/citt

 Avda. Ciencias s/n, Campus Sur Tfno (9)81 599800
 15706 Santiago de Compostela (A Coruña) (9)81 563100 Ext 14380
 España Fax (9)81 599309
---------------------------------------------------------------------

    -----Mensaje original-----
    De: Alberto Perdomo <a.perdomo@codetel.net.do>
    Para: Lista de Visual Basic <vb-esp@ccc.uba.ar>
    Fecha: jueves 1 de octubre de 1998 13:47
    Asunto: (VB-ESP) Como obtengo el último numero "identity" de un
registro SQL Server


    Hola,

    Tengo varias tablas en SQL Server 6.5 con el tipo de datos
"identity" (lo que es AutoNumber en Access) como llave primaria.
Quisiera saber cuál es la mejor forma para obtener el número de un
registro recien ingresado, o sea, tan pronto hago INSERT a la tabla
quisiera saber cual fue el número generado para este registro.

    En espera de sus comentarios,

    Gracias,

    Alberto.

SQL = "SET NOCOUNT ON INSERT TuTabla VALUES(DEFAULT) SELECT @@IDENTITY
SET NOCOUNT OFF "
Set rs = cn.OpenResultset(SQL, rdOpenKeyset, rdConcurRowVer,
rdExecDirect)
MsgBox "Tu Nuevo Valor asignado por el Identity es " & Cstr(rs(0))

Nota: En Values(Default,Default.....) pones tantos default como campos
tenga la tabla
    -----Original Message-----
    From:    Alberto Perdomo
    Sent:    Thursday, October 01, 1998 7:37 AM
    To:    Lista de Visual Basic
    Subject:    (VB-ESP) Como obtengo el último numero
"identity" de un registro SQL Server
    Importance:    High

    Hola,
     
    Tengo varias tablas en SQL Server 6.5 con el tipo de datos
"identity" (lo que es AutoNumber en Access) como llave primaria. 
Quisiera saber cuál es la mejor forma para obtener el número de un
registro recien ingresado,  o sea, tan pronto hago INSERT a la tabla
quisiera saber cual fue el número generado para este registro.
     
    En espera de sus comentarios,
     
    Gracias,
     
    Alberto.