M
Marc
I've opened a Query with the following commands:
*******************************************
Set Wsp = DBEngine.Workspaces(0)
Set Dbs = CurrentDb
Set rstList = Dbs.OpenRecordset("qryList", dbOpenForwardOnly)
' I've tried also with dbOpenDynaSet.
Do While Not rstList.EOF
If SomeCondition Then
DoCmd.RunCommand acCmdDeleteRecord
Endif
rstList.MoveNext
Loop
*******************************************
This doesn't work. I get a message: "The command or action DeleteRecord is
not available"
How can I delete the current record?
Marc
*******************************************
Set Wsp = DBEngine.Workspaces(0)
Set Dbs = CurrentDb
Set rstList = Dbs.OpenRecordset("qryList", dbOpenForwardOnly)
' I've tried also with dbOpenDynaSet.
Do While Not rstList.EOF
If SomeCondition Then
DoCmd.RunCommand acCmdDeleteRecord
Endif
rstList.MoveNext
Loop
*******************************************
This doesn't work. I get a message: "The command or action DeleteRecord is
not available"
How can I delete the current record?
Marc