Invoervak met beveiliging

[gregortman]

Beste Mensen

Ik heb een formulier met gebruikersnamen en wachtwoorden van klanten, nu is het zo dat als ik een WW en Gebrnaam in heb gevuld, dat ik per ongeluk de gegevens kan verliezen als ik even niet oplet en denk dat ik in een ander veld ben.

Is het mogelijk om een invoervak te beveiligen, zodat als ik wat wil invullen, ik eerst een getal reeks of ww moet invullen alvorens ik het invoervak kan wijzigen??

Ik ben benieuwd

Groet

Gregor

 

[Bartuls]

Open je formulier in ontwerpmodus.
Ga naar de eigenschappen van het tekstveld waar het om gaat.
Zet de cursor in de eigenschap notatie.
Druk op F1 en ontdek de wondere wereld van de notaties van velden.

 

[gregortman]

invoervak

Ben Benieuwd wat deze wereld mij gaat brengen

Bij voorbaat dank

gregor

 

[gregortman]

invoervak beveiligen

Beste Bartuls,

Ik heb de wondere wereld bekeken, alleen kom hier geen stap mee vooruit.
Ik kan niet echt vinden hoe ik iets moet beveiligen.

heb je nog andere sugesties

Met vriendelijke groet

Gregor

 

[LVT]

Hoi,

bekijk eens dit filmpje om een inlog scherm te maken. (Engels).
http://www.datapigtechnologies.com/flashfiles/loginform.html

 

[gregortman]

invoervak blokeren

beste LVT,

bedankt voor je snelle reactie

Een inlogscherm stond nog op mijn verlanglijstje, maar dit is niet wat ik bedoel.

Kort gezegd na het invoeren in een tekstvak moet dit tekstvak geblokkeerd worden (of beveiligd of hoe je het wil noemen) met de reden dat de ingevoerde tekst niet door mij zelf per ongeluk veranderd kan worden.

Dus een beveiliging dat de ingevoerde tekst niet zomaar kan worden overschreven, nadat het ingevoerd !!

Met vriendelijke groet

Gregor

 

[ReneDirks]

Kan met het Lostfocus event. Even aannemen dat de textbox txtWachtwoord heet, en er een control txtVolgendVeld is:

Private Sub txtWachtwoord_LostFocus()
    'focus moet verplaatst worden bij het disablen van een textbox:
    'Me.txtVolgendVeld.SetFocus
    Me.txtWachtwoord.Enabled = False
End Sub

Eventueel kun je ipv de property Enabled ook Locked gebruiken:

Private Sub txtWachtwoord_LostFocus()
    Me.txtWachtwoord.Locked = True
End Sub

 

[gregortman]

tekstveld locked

Top

dit bedoelde ik.

Eh hoe krijg ik hem nu weer unlocked

Het mooiste zou zijn als er een tekste box komt waar ik ter bevestiging op moet drukken en dat dan het veld weer unlocked is

Bij voorbaat dank

gregor

 

[ReneDirks]

Het mooiste zou zijn als er een tekste box komt waar ik ter bevestiging op moet drukken

Bedoel je een knop? Op een tekstbox drukken is nogal lastig, anders dan misschien het GotFocus() event.

Private Sub btnConfirm()
  me.txtWachtwoord.Enabled = false
  'me.txtWachtwoord.Locked = false
End Sub

 

[gregortman]

veld unlocken

Beste renedirks,

Ik was er zelf al uitgekomen met het volgende:

Private Sub Digid_Enter()

txt = "Je kan nu de gebruikersnaam wijzigen! "
MsgBox (txt)
Me.Digid.Locked = False

End Sub

Bedankt voor jullie help

Gregor