Opdatere et felt i Access

Hey,

Nogen der kan hjælpe mig med hvordan jeg via Visual Basic retter i en felt i en access database?

min kode er nu således:
Dim datDB As Database
Dim recCustomer As Recordset
Dim recCusActive As Recordset
Dim sqlFS As String
Dim sqlCus As String
Dim recId As String

DBEngine.SystemDB = \"F:\\VB\\Troels\\TP\\Violation\\system.mdw\"
DBEngine.DefaultUser = \"lj\"
DBEngine.DefaultPassword = \"pippen\"

Set datDB = DBEngine.Workspaces(0).OpenDatabase(\"F:\\VB\\Troels\\TP\\Violation\\2000.mdb\")
sqlFS = \"Select * FROM CustomerActive\"
Set recCusActive = datDB.OpenRecordset(sqlFS)

Do While Not recCusActive.EOF

    recId = recCusActive(\"RecID\")
       
    sqlCus = \"Select * FROM Customer WHERE RecId = recId\"
    Set recCustomer = datDB.OpenRecordset(sqlCus)
   
    recCustomer(\"Locked\") = -1 (dette fungere ikke)
       
    recCusActive.MoveNext
   
Loop

End Sub

jeg skal altså rette det felt der hedder \"Locked\" til -1

30 point til den første!