10. juni 2016 - 13:55Der er
3 kommentarer og 2 løsninger
2 gange insert i Atfer_Insert kode
Jeg har en formular (lavet ud fra Job) hvor jeg indtaster en ny record - det giver mig Me.ID (=Job.ID)
Me.ID skal bruges til først at indsætte en record i en anden tabel COC - giver mig COC.ID (autonumerering), denne nye COC.ID skal jeg bruge til at indsætte en record i en tredje tabel RevHist.
Min kode i After_Insert: insStr = "Insert into COC (JobID, AttText) values (" & Me.Id & "," & pling & s & pling & ")" CurrentDb.Execute insStr, dbFailOnError
Det her går fint :) Så vil jeg slå COC.ID op insCtrID = DLookup("ID", "COC", "ID = " & Me.txtJobID)
Og så får jeg fejl fordi COC record ikke 'findes' endnu..... :(
Jeg testede med insCtrID = DCount("ID", "COC", "ID = " & Me.txtJobID) Og får 0 tilbage
Så hvordan fanger jeg min nye record???? Me.Requery fungerer ikke, så står jeg ikke længere på den record, som jeg lige har oprettet.....
fdata - jeg ved godt at det ser lidt rodet ud, men jeg prøver igen ;)
Tabeller: Job.ID autonum
COC.ID autonum COC.JobID reference til Job
Jeg ønsker at slå COC.ID op så jeg kan bruge den i næste Insert:
RevHist.ID autonum RevHist.COCID reference til COC
Så det er en 3-trins struktur med RevHist til at holde historikken for COC tabellen. Når et nyt Job oprettes ønsker jeg automatisk at oprette en record i COC og den tilhørende record i RevHist.
Giver det mening? Og jeg kigger lige min kode grundigt efter :)
After you have inserted the record into COC, can you confirm the record is created by manually going into the table to see? If it isn't then you know where the problem lies.
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.