CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

per2edb Guru

05. april 2024 - 14:15 Der er 6 kommentarer

ilter hvor recorden ikke eksisterer

Jeg har et dataark filter hvor det hænder recorden ikke eksisterer på dataarket
Det kan løses med errorhandlin men jeg kan ikke lide fejlen først skal opstå

Jeg har fundet koderne nedenfor men det giver stadig fejlen ved filteret
Har i en løsning uden brug af errorhandling

Frm.Form.Filter = fldName & " = " & fldRecordValue
Frm.Form.FilterOn = True
If Frm.Form.Recordset.RecordCount = 0 Then
Frm.Form.FilterOn = False

MsgBox "Record ikke fundet"

End If

Synes godt om

Gustav Ekspert

05. april 2024 - 15:06 #1

Måske noget i denne stil:

Dim Records As DAO.Recordset

Dim Filter  As String

Set Records = Frm.Form.RecordsetClone
If Records.RecordCount > 0 Then
    Filter = fldName & " = " & fldRecordValue
    Records.FindFirst Filter
    If Not Records.NoMatch Then
        Frm.Form.Filter = Filter
        Frm.Form.FilterOn = True
    Else
        MsgBox "Record ikke fundet"
        ' Måske:
        ' Frm.Form.FilterOn = False
    End If
End If
Records.Close

Synes godt om

per2edb Guru

05. april 2024 - 15:19 #2

Tak
Jeg prøver det

Synes godt om

per2edb Guru

05. april 2024 - 16:13 #3

Melder fejl ved Frm.Form.Filter = Filter
Fejlkode o (Øv)

Det er samme problemstilling som ved min eksisterende kode

Synes godt om

Gustav Ekspert

05. april 2024 - 16:17 #4

Der findes jo mindst én post, så at sætte Filter kan ikke fejle. Så det er filterudtrykket, det er galt med.

Synes godt om

per2edb Guru

06. april 2024 - 12:21 #5

Nu har jeg fejlårsagen
SQL kaldet ligger i Form_Load

Første gennemløb virker perfekt
men efterfølgende kræver SQL kaldet opdateres efter Filteret

Kender i en metode til at kalde Form_Load for opdatering

Synes godt om

Gustav Ekspert

06. april 2024 - 18:49 #6

Det giver ikke megen mening.
Et SQL "kald" ... til hvad?
Hvis det er definitionen af formularens recordsource, kræves det ikke efter tilføjelse af filteret - så ophæves filtersætningen jo.
Og man kalder ikke noget før en opdatering - man kan validere før opdatering og eventuelt gøre noget efter opdatering.

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Flere spørgsmål fra Access kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Sletning af Field i all Records Af ingeman i Access	1	I dag 06:09	I dag 08:07
Vise en popup overskrift når cursoren stryges henover en control Af per2edb i Access	3	27/04/202413:38	27/04/202418:05
DoCmd.OpenForm som ikke PopUp Af per2edb i Access	2	11/04/202411:02	11/04/202411:34
Kan ikke sætte bredde på boks i detajlesektion ( baseret på værdi fra felt på formular ) Af martens i Access	2	03/04/202423:18	05/04/202405:59
Fejl 3053 Af per2edb i Access	1	20/03/202409:26	20/03/202410:40

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS