Søg
Avatar billede funkystuff Nybegynder
25. september 2003 - 10:40 Der er 7 kommentarer og
1 løsning

Opdatering af formular

Jeg har oprettet en formular, hvor man kan vælge nogle kriterier. På baggrund af disse kan man på en knap, køre en forespørgsel.
Ligeledes er der i samme formular, en list-box, hvor resultatet af forespørgslen vises.

Jeg kan dog ikke få list-box'en til at opdatere automatisk hver gang man kører forspørgslen. Den viser kun tidligere resultater. Den opdaterer dog hvis jeg går i design-view og tilbage igen - men det holder ikke helt...

Altså:
Hvordan får man list-boxen til at opdatere automatisk efter hver forespøgsel?
Avatar billede Make IT Easy - Thomas Jepsen Praktikant
25. september 2003 - 10:44 #1
Me!DinListbox.Requery
Avatar billede henrik13 Nybegynder
25. september 2003 - 10:46 #2
Me.Din listebox.reqverry
Avatar billede funkystuff Nybegynder
25. september 2003 - 10:53 #3
Tak, men jeg er nok nødt til at have svaret på lidt lavere niveau. Jeg skriver ikke selv koden, men er mere på menu/design niveau. Kan I forklare det anderledes?
Avatar billede Make IT Easy - Thomas Jepsen Praktikant
25. september 2003 - 10:54 #4
Henrik, du kan i det mindste stave kommandoen rigtig og bruge den rigtige syntaks
Avatar billede Make IT Easy - Thomas Jepsen Praktikant
25. september 2003 - 10:56 #5
Funkystuff-> på den knap, som kører forespørgslen skal du lægge koden.
Hvis knappen er knyttet til en makro, skal du tilføje en linie efter ÅbnForespørgsel-handlingen, som hedder:
Genforespørg med argumentet [Navn på din liste]
Avatar billede funkystuff Nybegynder
25. september 2003 - 11:04 #6
Har lidt problemer med at få det til at virke... Her er koden som kører forespørgslen:

Private Sub Command6_Click()
On Error GoTo Err_Command6_Click

    Dim stDocName As String

    stDocName = "que_find_test"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Command6_Click:
    Exit Sub

Err_Command6_Click:
    MsgBox Err.Description
    Resume Exit_Command6_Click

End Sub
Avatar billede Make IT Easy - Thomas Jepsen Praktikant
25. september 2003 - 11:05 #7
Private Sub Command6_Click()
On Error GoTo Err_Command6_Click

    Dim stDocName As String

    stDocName = "que_find_test"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    Me!NavnPåDinListe.Requery
Exit_Command6_Click:
    Exit Sub

Err_Command6_Click:
    MsgBox Err.Description
    Resume Exit_Command6_Click

End Sub
Avatar billede funkystuff Nybegynder
25. september 2003 - 11:12 #8
Perfekt, nu virker det. Tak for hjælpen.
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
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
en word dotx fil stilles om til at blive gemt i skyen Af per2edb i Access 9 16/04/202620:11 21/04/202615:43
AI integreret i Access Af per2edb i Access 3 06/04/202610:42 06/04/202612:58
Autonummerering Af hlnviv i Access 2 06/03/202606:24 06/03/202607:48
stigende sortering på et Link felt Af hlnviv i Access 6 03/03/202613:18 04/03/202608:09
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
07/1022:52 Google beskeder har/havde en bug, så den sendte tilfældige gamle beskeder gemt indeni nye beskeder efter skifte til ny Samsungtelefon via Samsung Smart Switch Af KennethLykke i Apps til Android
05/1010:31 Min IPAD vil ikke oplade. Af Nørdnot i Mac
04/1018:04 Findes der et "Papir-kurv" symbol, man kan sætte på Firefox og Google Chrome ? (For oven) Af Ikke-ekspert i Browsere
03/1012:14 Ang udskrift Canon mb5050 Af made18 i Printere
02/1021:29 Vedr. Windows 11 version 26H2 Af ErikHg i Fri debat
White papers
Flere white papers »