RETORNAR A ID

MOREIRA 02/10/2017 09:46:53
#476895
Bom dia a Todos, preciso recuperar a ID do registro gravado

Tipo de Campo - Integer -> Primary Key

BaseDados FireBird

O que há de errado nessa função ?

  Using con As FbConnection = GetConnection()
            Dim insert As String = ([Ô]INSERT INTO TBFORNEC (CNPJ) VALUES (1111111111111111); SELECT LAST_INSERT_ID()[Ô])
            Dim cmd_query As New FbCommand(insert, con)
            Dim cmd_result As Integer = CInt(cmd_query.ExecuteScalar())

            MsgBox(cmd_result)
        End Using


KERPLUNK 02/10/2017 11:16:35
#476897
Tem uns paranauê no Firebird que tem que ser feito quando executando SQL em bloco assim. Tem que setar um termo, mais ou menos assim:

SET TERM ^;
EXECUTE BLOCK
AS
BEGIN
 
/*seus comandos*/
 
END^
SET TERM ;^
OMAR2011 02/10/2017 11:50:14
#476898 Resposta escolhida
Use returning ID .
Dim insert As String = ([Ô]INSERT INTO TBFORNEC (CNPJ) VALUES (1111111111111111) returning ID[Ô])
Apenas assim.
Tópico encerrado , respostas não são mais permitidas
Voltar