Avatar billede opal Nybegynder
16. august 2001 - 10:33 Der er 8 kommentarer og
1 løsning

kontrol af der kun findes en værdi i tabellen

Hvordan udfører jeg en hændelse som reagerer på indskrivning af en værdi (reelt tal) i en formular.
Formularen kaldes test. Tabellen kaldes reg. Feltet kaldes sagnr. Jeg har prøvet med beforeupdate, men får en kompileringsfejl. Den omtalte værdi må kun optræde een gang i feltet. Feltet er en primærnøgle oprettet som indekseret uden dubletter, så access giver en generel meddelelse om fejl ved opdatering når næste post skal oprettes hvis posten er en dublet, men det jeg ønsker er en reaktion i det øjeblik man forlader feltet sagnr i formularen test
På forhånd tak for hjælpen

Opal
Avatar billede proaccess Nybegynder
16. august 2001 - 10:38 #1
Prøv med dette (ikke aftestet):

Private SUB sagnr_AfterUpdate()
  If Dlookup(\"[sagnr]\",\"reg\",\"[sagnr]=\" & me.sagnr then
    MsgBox \"Record eksisterer allerede...\"
  End If
End Sub
Avatar billede nordclc Nybegynder
16. august 2001 - 11:51 #2
Skal den ikke ligge på hændelsen: VedUdgang eller fokus væk?

//Claus
Avatar billede terry Ekspert
16. august 2001 - 12:07 #3
Private Sub sagnr_LostFocus()

\'NOTE: Copywright proaccess....
If Dlookup(\"[sagnr]\",\"reg\",\"[sagnr]=\" & me.sagnr then
    MsgBox \"Record eksisterer allerede...\"
    me.sagnr.setfocus
End If

 
End Sub
Avatar billede terry Ekspert
16. august 2001 - 12:11 #4
Proacces> congratulations on getting into the Top 10.
Avatar billede proaccess Nybegynder
16. august 2001 - 12:20 #5
terry> thx... Also for the use of my NOT copyrighted solution... Which rightfully should be placed on LostFocus of the control...
Avatar billede proaccess Nybegynder
17. august 2001 - 09:01 #6
OR NOT... LostFocus fires even if you are just browsing records... and then you will always have a record present in the recordsource... OR??
Avatar billede kern Nybegynder
17. august 2001 - 16:30 #7
Jeg har forsøgt mig med ovenstående, men kan ikke få det tilat virker. Jg er ikke særlig erfaren udi VB, så bær over med mig. 1) Mangler der ikke en afsluttende parantes? 2) Kan jeg have problemer fordi det felt er tekst - og i så fald, er det så muligt at teste? 3) Hvordan springer jeg til den post som evt. bliver fundet.
- det var mange spørgsmål. På forhånd mange tak!
Avatar billede proaccess Nybegynder
18. august 2001 - 07:53 #8
1) JO, der mangler en parantes...
2) JO, der skal tilføjes et par \'\'er...
3) Den var da vist straks værre...

Private SUB sagnr_AfterUpdate()
  If Dlookup(\"[sagnr]\",\"reg\",\"[sagnr]=\'\" & me.sagnr & \"\'\") then
    MsgBox \"Record eksisterer allerede...\"
  End If
End Sub

Avatar billede terry Ekspert
21. august 2001 - 16:11 #9
Proaccess>Actually I think it would be best to have it in the BeforeUpdate event, here its possible to cancel any data change. But really its just a matter of taste, and theres lots to choose from!

Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester