27. februar 2006 - 15:39Der er
3 kommentarer og 1 løsning
Opdatering af kombinationsboks
Min kombinationsboks trækker på en stamdatatabel, som indeholder perioder, eksempelvis 01-2005, 02-2005 ...
Disse perioder illustrerer hvilke data der er opdateret i databasen.
Når jeg skal opdatere data i databasen, vil jeg gerne opdatere min stamdatatabel via denne kombinationsboks, således at brugeren istedet for at vælge en værdi, istedet indtaster en ikke i forvejen eksisterende værdi eksempelvis 01-2006
Denne skal så via kombinationsboksen indsættes i tabellen.
Indsæt denne i comboen's VedikkePåListe (NotInList)
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
En forudsætning er, at comboen's egenskab BegrænsTilListe er sat til Ja.
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.