si scusa
If (CStr(Request("MM_insert")) = "form1") Then
If (Not MM_abortEdit) Then
' execute the insert
Dim MM_editCmd
Set MM_editCmd = Server.CreateObject ("ADODB.Command")
MM_editCmd.ActiveConnection = MM_CONN_STRING
MM_editCmd.CommandText = "INSERT INTO prezzi ([data], benzina, diesel, diesel2, gpl, metano) VALUES (?, ?, ?, ?, ?, ?)"
MM_editCmd.Prepared = true
MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 135, 1, -1, MM_IIF(Request.Form("data"), Request.Form("data"), null)) ' adDBTimeStamp
..........
..........