ID du dernier Insert en SQL ?

j'ai lu deux codes sources sur ce site indiquant l'utilisation de T-SQL (par @@identity) pour obtenir l'ID de l'enregistrement nouvellement cree mais aucun ne fonctionne pour moi ?

voici comment j'insere mon enregistrement , comment recuperer l'ID  sans passer par un execute scalar ?

Dim objconnect As New SqlClient.SqlConnection(ChaineCnx)Dim SDATempo As New SqlClient.SqlDataAdapter("select * from toto", objconnect)
Dim DSTempo As New DataSet
SDATempo.Fill(DSTempo, "tTempo")
Dim dvTempo As New DataView(DSTempo.Tables("tTempo"))

Dim objcommandbuilder As New SqlClient.SqlCommandBuilder(SDATempo)
SDATempo.InsertCommand = objcommandbuilder.GetInsertCommand

Dim tTable As DataTable
Dim rRow As DataRow
tTable = dvTempo.Table
rRow = tTable.NewRow()
rRow("strmonchamps") = mavaleur

tTable.Rows.Add(rRow)
SDATempo.Update(DSTempo, "tTempo")

dvTempo = Nothing : DSTempo = Nothing : SDATempo = Nothing : objconnect.Close() : objconnect = Nothing

merci d'avance