Ti ringrazio per il link dove ho trovato parecchie cose interessanti.
ho fatto delle prove e mi da un errore che poi ho risolto chiudendo la connessione per alcuni secondi e successivamente, dopo averla aperta, sono riuscito a inserire la colonna nuova. Ovviamente sapevo che non cera una colonna uguale.
Vi posto l'immagine con l'errore e il codice con la soluzione. Se poi mi sai dire come ovviare al problema senza chiudere la connessione lo preferisco. Ho ipotizzato che potrebbe risultare aperta la tabella, e non la fa modificare, ma non so come si chiude una singola tabella del db.
Public Sub CmdTest_Click(sender As Object, e As EventArgs) Handles CmdTest.Click
Try
If ConnessioneFileDBn.State = ConnectionState.Open Then
ConnessioneFileDBn.Close()
Sleep(6000)
End If
ConnessioneFileDBn = New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & CartellaEseguiti & "Eseguiti_" & Cmb_File.SelectedItem & ".accdb")
ConnessioneFileDBn.Open()
Dim StrComando As String = "ALTER TABLE PARAMETRI ADD COLUMN ATTIVO TEXT(25)"
ComandoDB = New OleDb.OleDbCommand(StrComando, ConnessioneFileDBn)
ComandoDB.ExecuteNonQuery()
ComandoDB.Dispose()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub