record verwijderen

• 

  Sabrina

  20-12-2004 12:18

  Op mijn hoofdformulier is er een close-button.

  Bij het afsluiten wordt er de vraag gesteld om het record te bewaren.

  Bij cancel moet het record verwijderd worden, maar er gebeurt niets.

  Wat is er verkeerd met mijn code?

  Private Sub cmdClose_Click()

  If MsgBox(“Save Changes?”, vbOKCancel) = vbOK Then

  DoCmd.RunCommand acCmdSaveRecord

  DoCmd.Close acForm, “FrmNewTP”

  Else

  DoCmd.RunSQL “DELETE * FROM Main WHERE SubItemNr = txtSubItemNr.Value”

  DoCmd.Close acForm, “FrmNewTP”

  End If

  End Sub

  Klopt mijn DELETE statement niet?

  Main is mijn hoofdtabel en er zijn verschillende tabellen aan gekoppeld.

  Bij de relaties ertussen staan alle checkboxen aangevinkt.
• 

  RV

  20-12-2004 12:33

  Je RunSQL moet sowieso zijn:

  DoCmd.RunSQL “DELETE * FROM Main WHERE SubItemNr = ” & Me.txtSubItemNr & “”

  RV