gangstalaz
Gebruiker
- Lid geworden
- 13 sep 2010
- Berichten
- 131
Hallo,
Ik werk met access 2003 en heb een besteldatabase waarbij de bestelling in 2 tabellen worden opgeslagen, betreffende: tblBestellingen en tblBestelregels.
Om de bestellingen later te kunnen bekijken gebruik ik het volgende formulier
Nu wil in dit formulier een opdrachtknop toevoegen waarmee ik bestelregels kan verwijderen (dus selecteren en verwijderen met opdrachtknop), maar indien het de laatste bestelregel is, moet de bestelling verwijderd worden.
Ik heb echter wel een code om iets te verwijderen uit een dergelijke formulier, maar dit geldt alleen voor regels uit 1 tabel.
Zie code:
Alvast bedankt!
Ik werk met access 2003 en heb een besteldatabase waarbij de bestelling in 2 tabellen worden opgeslagen, betreffende: tblBestellingen en tblBestelregels.
Om de bestellingen later te kunnen bekijken gebruik ik het volgende formulier
Nu wil in dit formulier een opdrachtknop toevoegen waarmee ik bestelregels kan verwijderen (dus selecteren en verwijderen met opdrachtknop), maar indien het de laatste bestelregel is, moet de bestelling verwijderd worden.
Ik heb echter wel een code om iets te verwijderen uit een dergelijke formulier, maar dit geldt alleen voor regels uit 1 tabel.
Zie code:
Code:
Private Sub CmdDelete_Click()
For Each itm In Me.lstLeverancier.ItemsSelected
strsql = "DELETE FROM tblBestelregels "
strsql = strsql & "WHERE BestelRegel_ID = " & CStr(Me.lstLeverancier.ItemData(itm)) & ";"
CurrentDb.Execute strsql, dbFailOnError
Next itm
Me.lstLeverancier.SetFocus
Refresh
End Sub
Alvast bedankt!