Access 2002 en XP

[plenarts]

Goedemiddag,

Ik zit met een vreemd probleem. Ik werk met Access 2002 onder XP op bedrijfsnetwerk.
Als ik in Access met een verwijder Query een record uit een tabel wil laten verwijderen ontstaat er een probleem. Het verwijderen van het record gaat helemaal ok, maar zodra record is gedelete voegt hij een nieuw leeg record toe. Dit geeft onmiddelijk conflict met de code die achter de verschillende velden staat.

Doe ik dezelfde handeling (met hetzelfde programma) op pc met Access 2000 en XP functioneert alles correct. Er wordt geen nieuw record toegevoegd.

Heeft iemand enig idee wat dit zou kunnen zijn

Bedankt Paul

 

[Bartuls]

Hoe verwijder je het record precies?

 

[plenarts]

met dit stukje code wordt het record gedelete

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Paul

 

[Bartuls]

Ok,

Daar heb je meteen je probleem te pakken.
DoMenuItem is niet meer in die vorm beschikbaar in access 2002.

Uit de Access Help:
-----------------------------------------
Opmerking Voor dit argument bestaat geen instelling acMenuVer80. U kunt de methode DoMenuItem niet gebruiken om opdrachten uit Microsoft Access 97 of Microsoft Access 2000 weer te geven (hoewel bestaande methoden DoMenuItem in Visual Basic-programmacode nog wel werken). Gebruik in plaats daarvan de methode RunCommand.
------------------------------------------

Herschrijf je commando's nar RunCommand en je probleem is opgelost.

 

[plenarts]

Wordt dit dan: DoCmd.RunCommand acCmdDeleteRecord ?

want hij blijft een leeg record toevoegen

Paul

 

[Bartuls]

Dat zou wel goed moeten zijn.

En als je het record verwijderd met behulp van een SQL statement?

DELETE FROM jouwTabel WHERE jouwconditie?

Wordt er dan nog steeds een leeg record toegevoegd?

Dit kun je doen met de volgende code:

Dim db as database
Dim strSQL as string

Set db = currentdb()

strSQL = "DELETE etc."

domcd.setwarnings false
db.execute strSQL , dbfailonerror
docmd.setwarnings true

set db = nothing

 

[plenarts]

Dit ziet er beter uit. Met Runcommand werkt het niet maar inderdaad met SQL wel.

Bedankt Paul