Como corrigir esse SQL?

[pedrovisk 1]

Olá Galera!

 

Estou inserindo os valores de 3 campos e automaticamente quero recuperar, na tabela que recem recebeu esses valores, pegar o ID gerado utilizando o @@Identity, eu não sei como é essa instrução no Access, conforme abaixo, mas ela gera o erro em VERMELHO.

 

 

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Ponto e vírgula ; faltando no final da instrução SQL.

/fortalmag_2006/Sistema/Confirmacao_Orcamento.asp, line 41

 

Logo abaixo, está o SQL que insere os dados e recupera o ID recem gerado:

 

INSERT INTO Orcamento (IDCliente,IDProduto,Quantidade) VALUES (2,4,2) SELECT @@IDENTITY AS IDOrcamento

 

Abaixo, está o código da página:

 

<%

Set objCon = Server.CreateObject("ADODB.Connection")

strCon = MM_Fortalmag_STRING

objCon.Open strCon

 

IDCliente = Session("IDCliente")

IDProduto = Request.Form("Produto")

Quantidade = Request.Form("Quantidade")

 

SQL = SQL & "INSERT INTO Orcamento (IDCliente,IDProduto,Quantidade) "

SQL = SQL & "VALUES ("& IDCliente &","& IDProduto &","& Quantidade &") "

 

SQL = SQL & "SELECT @@IDENTITY AS IDOrcamento "

 

'Response.Write(SQL)

'Response.End()

Linha 41 objCon.Execute SQL

Linha 42

Linha 43 IDOrcamento = objCon("IDOrcamento")

%>

Eu só preciso inserir os dados e recuperar o ID recem gerado para utilizar na tela de confimação.

Estou utilizando o Access 2003, mas o banco está em formato 2000.

[nirsu 0]

INSERT INTO Orcamento (IDCliente,IDProduto,Quantidade) VALUES (2,4,2); SELECT @@IDENTITY AS IDOrcamento