db.execute virker i access2000 men ikke i access97

HEJ

Hvorfor virker dette i 2000 men ikke i 97.

Private Sub flyt_Click()
Dim db As Database
Set db = CurrentDb

If DCount("*", "medarbejder", "[id] =  forms!flytfrm![lagerid]") > 0 Then

db.Execute "update lagerantal set antal = antal + (" & Me.Antal & ") where medarbejderid = ( " & Me.lagerid & ") and partsid = ( " & Me.partid & ")"
If db.RecordsAffected = 0 Then
  db.Execute "insert into lagerantal Values(" & Me.lagerid & ", " & Me.partid & "," & Me.Antal & ")"
End If

Else
   
    MsgBox ("Lagersted er ikke oprettet kontakt Jonas, eller vælg et ved at trykke på pilen")
    End If
   
   
End Sub

I 97 får jeg fejlen " der er for få parametre der var ventet 1"

På forhånd tak