Avatar billede mhq Nybegynder
15. november 2003 - 15:32 Der er 1 kommentar og
1 løsning

Not in list

Hej en dropdown box. Den henter 2 kolonner fra Tbl_1,- hvor BoundColumn er ikke vises,- men det gør kolonne 2 derimod. BoundColumn er Key i tabellen til dropdown.

Ved NotInList har jeg forsøgt Terry's løsning (http://www.eksperten.dk/spm/156359) . Det virker dog ikke helt, da jeg ikke ønsker at anvende en ekstra form, altså er OpenArgs delen ej relevant.

Hvordan opdaterer jeg Tbl_1 uden at bruge en ny form, men gerne MsgBox til lige at have muligheden til at fortryde en NotInList indtastning?
Avatar billede mugs Novice
15. november 2003 - 15:34 #1
Dim prompt As String
DoCmd.SetWarnings False
Response = acDataErrContinue
prompt = "Denne type findes ikke i listen, ønsker du at oprette den?"
If MsgBox(prompt, vbYesNo, "Typen findes ikke!") = vbYes Then
DoCmd.RunSQL "INSERT into Register (feltnavn) VALUES ('" & NewData & "')"
Response = acDataErrAdded
End If
DoCmd.SetWarnings True
Avatar billede mhq Nybegynder
15. november 2003 - 15:43 #2
Ja, thx!
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