Prova a semplificare così per un momento.


Dim dbcommand as new OleDbCommand(sql, dbconn)
Dim intVerifica As Integer

Con.Open()

intVerifica = dbcommand.ExecuteNonQuery()

Con.Close()


If intVerifica > 0 Then
Response.Write("Inserimento avvenuto con successo")
End If