Sì il codice funziona e uso SQL Server come DB. La SP è

CREATE Procedure AddOrdine
(
@IDCliente int,
@IDCarrello nvarchar(50),
@Pagamento varchar(1),
@Totale decimal(9,2),
@IDOrdine int OUTPUT
)
AS

/* Inserisce in Ordini */
INSERT INTO Ordini
(
IDCliente,
Pagamento,
Totale
)
VALUES
(
@IDCliente,
@Pagamento,
@Totale
)

SELECT
@IDOrdine = @@Identity



Purtroppo non ho mai usato le SP in Access.

Ciao
Umberto

In questo modo sembra funzionare anche con SP.
Il campo Numerico della tabella è impostato a Valuta.
Allego il codice:
sub UpdateBalance(decNewAmount as Decimal)

'Metodo con Stored Procedure
'***************************
dim objCmd as OleDbCommand = new OleDbCommand("spUpdateBalance", Conn)
objCmd.CommandType = CommandType.StoredProcedure


'set parameters for stored procedure
dim objParam as OleDbParameter
objParam = objCmd.Parameters.Add("@NewBalance", OleDbType.Currency)
objParam.Direction = ParameterDirection.Input
objParam.Value = decNewAmount.ToString("#,##0.00")


objParam = objCmd.Parameters.Add("@UserID", OleDbType.BSTR)
objParam.Direction = ParameterDirection.Input
objParam.Value = Request.Cookies("Account").Value
'***************************


'Metodo senza Stored Procedure
'*****************************
dim decNewAmount1

decNewAmount1=replace(cstr(decNewAmount),",",".")
dim strSQL as string = "UPDATE tblAccounts SET tblAccounts.Balance =" & decNewAmount1 & " " & _
"WHERE tblAccounts.UserID=" & Request.Cookies("Account").Value & ";"
dim objCmd as OleDbCommand = new OleDbCommand(strSQL, Conn)
'*****************************

try
objCmd.Connection.Open()
objCmd.ExecuteNonQuery

catch ex as OleDbException
lblMessage.Text = ex.Message
finally
objCmd.Connection.Close()
end try
end sub


Grazie a tutti
Ciao