Avatar billede ncbr Nybegynder
09. oktober 2001 - 20:45 Der er 9 kommentarer og
2 løsninger

Hvad er der galt her ???

Private Sub dato_AfterUpdate()
If IsNull(DLookup(\"[tid]\", \"bedstetider\", \"[DisciplinID] = DisciplinID\")) Then
    If Me.dato < Date Or Me.dato = Date Then
    Call hvisnull
    End If
End Sub

Function hvisnull()
DoCmd.OpenQuery \"QtilføjvedNull\", acViewNormal, acEdit
End Function

det er ikke tilføjelsesforespørgslen det er galt med, den fungere fint når jeg aktiverer den manuelt.
Avatar billede terry Ekspert
09. oktober 2001 - 20:59 #1
If IsNull(DLookup(\"[tid]\", \"bedstetider\", \"[DisciplinID] = \" & DisciplinID))
Avatar billede ncbr Nybegynder
09. oktober 2001 - 21:10 #2
that was a part of it but the is one minor error more, unless i have an msgbox between \"
    If Me.dato < Date Or Me.dato = Date Then\" and \"Call hvisnull\" it doesn\'t call my function, why ????
Avatar billede ncbr Nybegynder
09. oktober 2001 - 21:50 #3
the = there
Avatar billede proaccess Nybegynder
10. oktober 2001 - 07:39 #4
Prøv med:

Private Sub dato_AfterUpdate()
    If IsNull(DLookup(\"[tid]\", \"bedstetider\", \"[DisciplinID] = \" & DisciplinID)) Then
        If Me.dato <= Date Then
            hvisnull
        End If
    End If
End Sub

Function hvisnull()
    DoCmd.OpenQuery \"QtilføjvedNull\", acViewNormal, acEdit
End Function
Avatar billede ncbr Nybegynder
10. oktober 2001 - 12:31 #5
Det kode jeg har skevet i spørgsmålet og terry\'s rettelse virker, men når det køres første gang blivr posten ikke tilføjet til tabellen. men hvis jeg blot ændre/indtaster et ciffer i datofeltet bliver den kørt andengang, hvordan hænger det sammen ???
Avatar billede terry Ekspert
10. oktober 2001 - 12:39 #6
hi ncbr> Well its hard to say, cant see all of your code. Does the dato_AfterUpdate get called the first time but no record is added with the  query \"QtilføjvedNull\"? Are you sure the query gets called the first time?

I cant see why the dato_AfterUpdate event should get called just by entering a character in the date field, are you sure there is no event procedure in the on Change Event?

Avatar billede ncbr Nybegynder
10. oktober 2001 - 13:03 #7
yes because i get the message \"you are about to ad 0 new record, are you .......

my best guess would be that the new record hasn\'t reached the \"Qtilføjvednull\" query at the time when it is executed
Avatar billede terry Ekspert
10. oktober 2001 - 13:10 #8
Ok, it gets called the first time. But why should it get called again just by enetering a character in the date field? Do you have a procedure on the On Change event?

I cant see what the Qtilføjvednull does, but try setting a breakpoint at this line and then step (F8) through the line. This is just to see if what you suspect is true. (the new record hasn\'t reached ...)
Avatar billede ncbr Nybegynder
10. oktober 2001 - 13:18 #9
*Qtilføjvednull in an Qyery that adds the number of the swimmer, disciplinid, time, and date to a table, best times reached. if there are no record yet with this disciplinid
Avatar billede ncbr Nybegynder
10. oktober 2001 - 13:21 #10
but this question doenst really matter anumore i have move the code fram After update to on exit, and i works just like i want it to.
Avatar billede terry Ekspert
10. oktober 2001 - 13:23 #11
OK :O)
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