Reserved error

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • Ronny Sigo

    Reserved error

    Hello all,
    I have made a form with a button to delete the current record.
    When clicking the button, I get a errmsg "Reserved error" I don't know what
    this means. And even though I have put "Me!Combo39.Req uery" instruction,
    after deleting - the combobox still shows the name of the deleted person.
    Furthermore, when closing the form and reopening again, it shows that the
    record was not deleted ...

    Can anybody help me with this? The coed is below ...
    Very much appreciated ...


    Private Sub Command54_Click ()
    On Error GoTo Err_Command54_C lick
    If MsgBox("Wil u werkelijk dit contact wissen?", _
    vbQuestion + vbYesNo, "Please confirm...") = vbYes Then

    DoCmd.DoMenuIte m acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuIte m acFormBar, acEditMenu, 6, , acMenuVer70
    Me!Combo39.Requ ery
    Me!Combo41.Requ ery
    Form.Requery
    End If
    Exit_Command54_ Click:
    Exit Sub

    Err_Command54_C lick:
    MsgBox Err.Description
    Resume Exit_Command54_ Click

    End Sub


  • Reggie

    #2
    Re: Reserved error

    Ronny, Probably the reason the record the record continues to show is
    because when you get the error the record isn't getting deleted. I pasted
    your code in a form and it ran without any problem. Is it possible that the
    recordsource of your form is a non-updatable recordset. In other words can
    you open the source directly via the table or query that the form is based
    on and delete a record?
    --
    Reggie

    ----------
    "Ronny Sigo" <roon ad skynet.be> wrote in message
    news:41012238$0 $1242$ba620e4c@ news.skynet.be. ..[color=blue]
    > Hello all,
    > I have made a form with a button to delete the current record.
    > When clicking the button, I get a errmsg "Reserved error" I don't know[/color]
    what[color=blue]
    > this means. And even though I have put "Me!Combo39.Req uery" instruction,
    > after deleting - the combobox still shows the name of the deleted person.
    > Furthermore, when closing the form and reopening again, it shows that the
    > record was not deleted ...
    >
    > Can anybody help me with this? The coed is below ...
    > Very much appreciated ...
    >
    >
    > Private Sub Command54_Click ()
    > On Error GoTo Err_Command54_C lick
    > If MsgBox("Wil u werkelijk dit contact wissen?", _
    > vbQuestion + vbYesNo, "Please confirm...") = vbYes Then
    >
    > DoCmd.DoMenuIte m acFormBar, acEditMenu, 8, , acMenuVer70
    > DoCmd.DoMenuIte m acFormBar, acEditMenu, 6, , acMenuVer70
    > Me!Combo39.Requ ery
    > Me!Combo41.Requ ery
    > Form.Requery
    > End If
    > Exit_Command54_ Click:
    > Exit Sub
    >
    > Err_Command54_C lick:
    > MsgBox Err.Description
    > Resume Exit_Command54_ Click
    >
    > End Sub
    >
    >[/color]


    Comment

    • Ronny Sigo

      #3
      Re: Reserved error

      Hi Reggie,
      Thanks for replying ...
      Yes I can delete a record via a query or directly in the table ....
      Greetz ...
      "Reggie" <NoSpamreggie@N oSpamsmittysine t.com> schreef in bericht
      news:lvCdnUpbb4 ZbNZzcRVn-rw@comcast.com. ..[color=blue]
      > Ronny, Probably the reason the record the record continues to show is
      > because when you get the error the record isn't getting deleted. I pasted
      > your code in a form and it ran without any problem. Is it possible that[/color]
      the[color=blue]
      > recordsource of your form is a non-updatable recordset. In other words[/color]
      can[color=blue]
      > you open the source directly via the table or query that the form is based
      > on and delete a record?
      > --
      > Reggie
      >
      > ----------
      > "Ronny Sigo" <roon ad skynet.be> wrote in message
      > news:41012238$0 $1242$ba620e4c@ news.skynet.be. ..[color=green]
      > > Hello all,
      > > I have made a form with a button to delete the current record.
      > > When clicking the button, I get a errmsg "Reserved error" I don't know[/color]
      > what[color=green]
      > > this means. And even though I have put "Me!Combo39.Req uery" instruction,
      > > after deleting - the combobox still shows the name of the deleted[/color][/color]
      person.[color=blue][color=green]
      > > Furthermore, when closing the form and reopening again, it shows that[/color][/color]
      the[color=blue][color=green]
      > > record was not deleted ...
      > >
      > > Can anybody help me with this? The coed is below ...
      > > Very much appreciated ...
      > >
      > >
      > > Private Sub Command54_Click ()
      > > On Error GoTo Err_Command54_C lick
      > > If MsgBox("Wil u werkelijk dit contact wissen?", _
      > > vbQuestion + vbYesNo, "Please confirm...") = vbYes Then
      > >
      > > DoCmd.DoMenuIte m acFormBar, acEditMenu, 8, , acMenuVer70
      > > DoCmd.DoMenuIte m acFormBar, acEditMenu, 6, , acMenuVer70
      > > Me!Combo39.Requ ery
      > > Me!Combo41.Requ ery
      > > Form.Requery
      > > End If
      > > Exit_Command54_ Click:
      > > Exit Sub
      > >
      > > Err_Command54_C lick:
      > > MsgBox Err.Description
      > > Resume Exit_Command54_ Click
      > >
      > > End Sub
      > >
      > >[/color]
      >
      >[/color]


      Comment

      Working...