+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 6 su 6

update tabelle db

  1. #1
    michele_1985 non  in linea Novello
    Buongiorno, programmo per passatempo, siate clementi..
    Ho questo problema, ho un database in access (.mdb)
    Mi collego, riempio delle datagridview
    faccio anche il binding.
    Modifico i dati
    Poi devo salvare le modifiche, credo con il comando tableadapter.update(dataset,"tabella")
    Se voglio aggiornare l'ultima tabella caricata nessun problema. Se provo con una tabella diversa mi d errore perch sente la struttura dell'ultima tabella, dove sbaglio? grazie sin d'ora..

    Dim Ds1 As New DataSet
        Dim Ta1, Ta2, Ta3, Ta4, Ta5 As New OleDbDataAdapter
        Dim Bs3, Bs5 As New BindingSource
    
    frmbase_load
    .............
    Dim MyconntoAccess As New OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=Temp/" + FrmBase.Nomesalvataggio + "Datibasket.mdb") 'Microsoft.JET.OLEDB.4.0 Microsoft.ACE.OLEDB.12.0
            MyconntoAccess.Open()
            Dim Command1 As New OleDbCommand
            Command1.Connection = MyconntoAccess
            Command1.CommandType = CommandType.Text
    Command1.CommandText = "SELECT * FROM Partite ORDER BY ID"
            Ta3.SelectCommand = Command1
            Ta3.Fill(Ds1, "Partite")
            Bs3.DataSource = Ds1
            Bs3.DataMember = "Partite"
            DgvPartite.DataSource = Bs3
    Command1.CommandText = "SELECT * FROM Rose ORDER BY ID"
            Ta5.SelectCommand = Command1
            Ta5.Fill(Ds1, "Rose")
            Bs5.DataSource = Ds1
            Bs5.DataMember = "Rose"
            DgvRose.DataSource = Bs5
    .......
    end sub
    
    private function ........
    ...........
    Dim MyconntoAccess As New OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=Temp/" + FrmBase.Nomesalvataggio + "Datibasket.mdb")
            MyconntoAccess.Open()
            Bs3.EndEdit()
            Dim Cb As New OleDbCommandBuilder(Ta3)
            Ta3.Update(Ds1, "Partite")
            MyconntoAccess.Close()
    .....
    end function
    
    Ultima modifica di AntonioG; 12-05-2021 16:53  Motivo: Tag CODE per il codice

  2. #2
    Sgrubak non  in linea Scribacchino
    Ciao,
    per il codice usa il tag CODE.

    Quote Originariamente inviato da michele_1985 Visualizza il messaggio
    Se provo con una tabella diversa mi d errore perch sente la struttura dell'ultima tabella, dove sbaglio?
    Questo non mi chiaro. Quale errore ritorna esattamente?

    Quote Originariamente inviato da michele_1985 Visualizza il messaggio
    private function ........
    Perch usi una Function?

    Per queste operazioni, si usa l'istruzione Using. Segui l'esempio della guida.

  3. #3
    Per il codice usa i tag CODE. Questa volta ho corretto io.
    ℹ️ Leggi di pi su AntonioG ...

  4. #4
    michele_1985 non  in linea Novello
    Scusate per il tag CODE
    Mi d questo errore

    System.InvalidOperationException: 'DataColumn 'Codicesquadra' mancante nella DataTable 'Partite' per la SourceColumn 'Codicesquadra'.'

    io non modifico colonne, non ne aggiungo e non ne tolgo, aggiungo solo tante righe e la datagridview si aggiorna correttamente. Codicesquadra una colonna di 'Rose' e tra l'altro in un'altra sezione del codice dove aggiorno la tabella 'Rose' con lo stesso codice, funziona perfettamente. Qui no e mi d l'errore suddetto

  5. #5
    Sgrubak non  in linea Scribacchino
    Temo che il problema stia qui:
    Command1.CommandText = "SELECT * FROM Partite ORDER BY ID"
    ...
    Command1.CommandText = "SELECT * FROM Rose ORDER BY ID"
    
    Se modifichi l'OleDbCommand... Prova a dichiarare comandi diversi a ciascun TableAdapter.

  6. #6
    michele_1985 non  in linea Novello
    Grazie era quello!

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Sql update
    Da amatorevt nel forum Microsoft Word
    Risposte: 5
    Ultimo Post: 29-09-2008, 13:08
  2. Risposte: 14
    Ultimo Post: 04-01-2007, 10:46
  3. Update
    Da born2win nel forum Delphi
    Risposte: 0
    Ultimo Post: 12-10-2005, 18:03
  4. medoto update o cancel update senza...
    Da maximo99 nel forum Microsoft Word
    Risposte: 1
    Ultimo Post: 25-05-2005, 12:43
  5. update
    Da katia84 nel forum Visual Basic 6
    Risposte: 2
    Ultimo Post: 28-04-2005, 17:43