reneemettrie
Terugkerende gebruiker
- Lid geworden
- 1 aug 2006
- Berichten
- 1.233
Een formulier wordt bij het openen beveiligd met de volgende code:
Via een knop kan die beveiliging eraf gehaald worden en kan de gebruikers wijzigingen aanbrengen. Na opslaan wordt de beveiliging er terug opgezet.
Ik wens nu een ComboBox om een record te zoeken. Maar die kan enkel gebruikt worden door expliciet op de bovenstaande knop te klikken.
M.a.w., je kunt geen keuze maken omdat het formulier beveiligd is.
Ik heb het volgende al geprobeerd maar dat werkt niet:
Click event van de ComboBox: me.allowedits = true
Bij de code om te beschermen "AllowEdits= false vervangen door:
Wie kan me helpen?
Code:
AllowEdits = False
AllowDeletions = False
AllowAdditions = False
Via een knop kan die beveiliging eraf gehaald worden en kan de gebruikers wijzigingen aanbrengen. Na opslaan wordt de beveiliging er terug opgezet.
Ik wens nu een ComboBox om een record te zoeken. Maar die kan enkel gebruikt worden door expliciet op de bovenstaande knop te klikken.
M.a.w., je kunt geen keuze maken omdat het formulier beveiligd is.
Ik heb het volgende al geprobeerd maar dat werkt niet:
Click event van de ComboBox: me.allowedits = true
Bij de code om te beschermen "AllowEdits= false vervangen door:
Code:
Dim ctr As Control
On Error Resume Next
For Each ctr In Me.Controls
If Not ctr.Name = "cbo_Zoek" Then
ctr.Locked = True
End If
Next ctr
Wie kan me helpen?