[Access] Een boolean waarde veranderen via VBA

Pagina: 1
Acties:
  • 115 views sinds 30-01-2008
  • Reageer

  • Triple
  • Registratie: Mei 2000
  • Laatst online: 20-05-2025
Goede mogen allemaal,

In Access ben ik bezig wat leuke dingetjes te maken en daarbij wordt ook VBA gebruikt. Ik heb een stuk code dat de waarden in een aantal tabel velden toetst aan de waarden in een formulier. Als de waarden gelijk zijn en bovendien ook de waarde van het veld "Disabled" in de tabel "False" is moet er in de tabel een boolean op "True" worden gezet.
De hele if then else constructie werkt, dat heb ik al geprobeerd met een functie om het hele record te wissen, na starten van de code inderdaad record weg.
Nu dus nog het wijzigen van een veld in het record dat geselecteerd is.
code:
1
2
3
4
5
6
7
8
9
10
11
  dsGebruiker.FindFirst Criterium
  If dsGebruiker.NoMatch = False Then
    If dsGebruiker!Wachtwoord = Forms![Gebruiker_verwijderen]!Wachtwoord Then
      If dsGebruiker!Disabled = False Then
  ----->dsGebruiker!Disabled = True<----- 'hier moet een opdracht komen om een wijziging in een record te maken. 
      fktGebruikerVerwijderen = True
    Else
      If IsNull(dsGebruiker!Wachtwoord) = True Then
        dsGebruiker!Disabled = True
        fktGebruikerVerwijderen = True
      End If

There is no beast without cruelty, Friedrich Nietzsche


Verwijderd

Probeer het eens met deze regels erbij:

dsGebruiker.edit
dsGebruiker!Disabled = True
dsGebruiker.update

Je geeft dan aan dan je een recordset wil wijzigen en dat je de wijziging wil opslaan.

[ Voor 0% gewijzigd door Verwijderd op 11-10-2002 09:10 . Reden: aanvulling ]


  • Triple
  • Registratie: Mei 2000
  • Laatst online: 20-05-2025
Many many thanx! Zo werkt het inderdaad :)

There is no beast without cruelty, Friedrich Nietzsche