ragazzi da poco sto iniziando con vb 2008,ma non riesco a capire perchè non va questo Insert
codice:
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim ObjConnection As OleDbConnection
        Dim ObjCommand As OleDbCommand
        Dim StrConn As String
        Dim Query As String
        Dim RispUtente As Integer
        Try
            StrConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Progetto Carrara\Carrara\Carrara\DbCarrara.accdb;"
            ObjConnection = New OleDbConnection(StrConn)
            ObjConnection.Open()

            Query = "INSERT INTO Cliente(Cognome,Nome,Indirizzo,Comune,Telefono,Cellulare,[Cognome Defunto],[Nome Defunto],[DN defunto],[DM defunto],[Zona interrato],[Posizione Nro]) VALUES ('"
            Query = Query & Me.TextBox1.Text & "'" & ","
            Query = Query & "'" & Me.TextBox2.Text & "'" & ","
            Query = Query & "'" & Me.TextBox3.Text & "'" & ","
            Query = Query & "'" & Me.TextBox4.Text & "'" & ","
            Query = Query & "'" & Me.TextBox5.Text & "'" & ","
            Query = Query & "'" & Me.TextBox6.Text & "'" & ","
            Query = Query & "'" & Me.TextBox7.Text & "'" & ","
            Query = Query & "'" & Me.TextBox8.Text & "'" & ","
            Query = Query & "'" & Me.TextBox9.Text & "'" & ","
            Query = Query & "'" & Me.TextBox10.Text & "'" & ","
            Query = Query & "'" & Me.TextBox11.Text & "'" & ","
            Query = Query & "'" & Me.TextBox12.Text & "'" & ")"
            ObjCommand = New OleDbCommand(Query, ObjConnection)
            RispUtente = ObjCommand.ExecuteNonQuery()
            '   If (RispUtente = 1) Then
            'MsgBox("inserimento effettuato")
            'ObjConnection.Close()
            'Me.TextBox1.Text = ""
            ' Me.TextBox2.Text = ""
            ' Me.TextBox1.Focus()
            ' Else
            ' MsgBox("Inserimento non Effettuato.Rinserisci i dati")
            'ObjConnection.Close()
            ' End If
            MsgBox("riusciuto")
Ho provato con il try e l'errore me lo da su RispUtente =ObjCommand.ExcuteNonQuery(),
quindi la query non va a buon fine...come mai?la connessione credo che sia tutto ok...