Access - undertrykke valideringsmeddelelse

Gå i Funktioner og i start, Fjern krydset i tillad fejl.
Vh Henrik

Like "??????"

in validation rule for field
Enter 6 char
In Validation text for field

ID skal være på 6 bogstaver

In Validation text for field!

Susanne hav eyou looked at the answer I gave here?
http://www.eksperten.dk/spm/196204

Desværre - troede også den kunne løses ved at bruge denne metode.

Den valideringsregl jeg har angivet på tekstboxen kommer ikke frem overhovedet. Får kun Access standard fejlmeddelelse

Længden af den indtastede tekststreng kan du teste ved at indsætte følgende kode i feltets BeforeUpdate event:

If Len(Me.felt1) <> 6 Then
MsgBox "Den indtastede tekst skal være på 6 tegn"
Me.Undo
End If

Du skal naturligvis udskifte feltnavnet (felt1) med dit eget.
Vedr. store bogstaver i valideringsreglen er jeg ikke rigtig klar over, men det har tidligere været rejst. Prøv evt. at søge.

Er desværre ikke nok. Virker kun hvis jeg ikke indtaster noget i feltet overhovedet.

Access vanlige fejlmeddelse kommer frem alligevel.

Har prøvet at tilføje

Response = acDataErrContinue

for at undertrykke den - men duer ikke.

Jeg bruger noget der ligner ovenstående fra mugs, men på LostFocus. Så kontrolleres længden, inden der foretages opdatering. Kun hvis længden er 6, skrives til tabellen, og så er valideringsreglen altid opfyldt, hvorfor meddelelsen er irrelevant og aldrig vises
.
If Len(id) <> 6 0 Then
MsgBox "Et ID skal være mellem 6 langt. Prøv igen", vbInformation
me!id = ""
End If

Prøver lige igen, og så uden fejl

If Len(id) <> 6 Then
MsgBox "Et ID skal være mellem 6 langt. Prøv igen", vbInformation
me!id = ""
End If

Sounds VERY strange that you can NOT use ValidationRule+ValidationText! and I can NOT see why mug's If Len(Me.felt1) <> 6 Then ... deosnt work!

Have you debugged too see what is happening?

desværre duer heller ikke.

Ok tror at mit problem måske skyldes at jeg allerede har noget error-handling på formularen frmInstruktoer. For at håndtere P-nøgle brud har jeg oprettet flg.


Private Sub Form_Error(DataErr As Integer, Response As Integer)

    ' If koden DataErr 3022 er = primær-nøglebrud.
    If DataErr = 3022 Then

        ' Vis custom fejl-meddelelse
        MsgBox "Instruktøren " & Me.Navn.Value & " med tlf. " & Me.Tlf & " er allerede oprettet!", vbOKOnly, "Indberetningsfejl"

        ' Undertrykker Access normale fejl-meddelelse.
        Response = acDataErrContinue

    End If
End Sub
_____________________________________________________

Har forsøgt mig med jkrons forslag


Private Sub InstruktoerID_LostFocus()

    If Len(InstruktoerID) <> 6 Then
    MsgBox "Den indtastede tekst skal være på 6 tegn, prøv igen.", vbInformation
    Me!InstruktoerID = ""
     
    End If
End Sub
_______________________________________

Access er hamrende ligeglad. Får stadig standard-fejlmedd. "Den indtaste værdi passer ikke til inputmasken ">LLLLLL" der er angivet for dette felt" :-(

og den nye custom-fejlmeddelelse kommer slet ikke frem.

Det der undrer mig endnu mere er, at hvis jeg f.eks. undlader at indtaste noget i InstruktoerID overhovedet, så vises den valideringsregl jeg har sat på valideringsregl og valideringsmeddelelse på formularen

Men hælder nu stadig til at jeg skal oprette en kode noget lignende

If DataErr = etEllerAndetTal
MsgBox bla bla

Kan det have noget at sige at jeg på tblInstruktoer har oprettet indeks på felterne Navn og Tlf - for at sikre mig at samme person ikke kan oprettes mere end en gang under forskelligt ID ???

og jep har prøvet at debugge - access overser fuldstændig koden.

Susanne>I will take a look at this too http://www.eksperten.dk/spm/196204

Susanne> Du behøver ikke at undre dig over at det virker, når du ikke indtaster noget. Access kontrollerer inputmasken først, og hvis den ikke er oveholdt, giver den en fejlmeddelelse, derfor når den aldrig frem til valideringsreglen, hvis ikke inputmasken er korrekt. Hvis du ikke indtaster noget, er der ikke noget brud på input masken, og så udføres den egentlige validering.

Terry
ok lige sendt dig en ny version af databasen.

håber virkelig der er en løsning på mine problemer :-)

Normally there is :o)

Terry > I´m impressed :-)

Kender ikke kommandoerne sSQL og CInt - hvad gør de ???

Mht. frmInstruktoer hvorfor er det nødvendigt med koden

If DataErr = 2279 Then
MsgBox bla bla bla.

da Access henter valideringsmeddelelsen fra tblInstruktoer ???

Oh! you can actually delete If DataErr .... this was just something I tried, but now it isnt needed.

sSQL is just a string I use to put the SQL statement in. Dont know if you know anything about SQL but its what is behind all of your queries.

Cint converts to an integer. It maybe isnt needed but I just want to make sure the week is a number.

:o)

SQL cool language :-)

Troede ikke løsningen kunne håndteres på denne måde. Tænkte i helt andre baner, som jeg ikke kunne få til at virke S**

Great job

Thanks Sussane>Yes Access can do many things, always something to learn!

Have a great weekend :o)
mvh
Terry

I lige måde

Susanne