Avatar billede legut Nybegynder
13. juli 2006 - 16:50 Der er 7 kommentarer og
1 løsning

Søgefunktion fra tekstfelt

Jeg er i gang med at lave en søgefunktion, hvor det skal være muligt at søge i fritekst. Jeg har en tabel(salg overdel) med kundenr og mærke. en forspørgsel(Søg) der trækker kundenr og mærke. Det jeg vil have er en formular hvor der er et tekstfelt og en knap. det skal så være muligt at indtaste det man vil søge efter, i tekstfeltet og så trykke på knappen, derefter henter den alle de kundenr som har det mærke. alt dette skal vises i en rapport.
Jeg har prøvet med:
stDocName = "Søg"
    DoCmd.OpenQuery stDocName, acNormal, "[salg overdel].Mærke=" & Me.Tekst0.

Men her får jeg en "type mismatch" fejl.

Hvordan får jeg det til at virke?
Avatar billede mugs Novice
13. juli 2006 - 17:18 #1
Thomas Jepsen har lavet en fremragende dynamisk søgefunktion på hjemmesiden makeiteasy.dk.

Øverst til højre Downloads og find 2Dynemisk filtrerings- og søgefunktion".
Avatar billede terry Ekspert
13. juli 2006 - 17:20 #2
Make the report so that it shows all records. Then youcan open the report from the form with

docmd.OpenReport "ReportName",,,"[salg overdel].Mærke = '" & Me.Tekst0 & "'"
Avatar billede mugs Novice
13. juli 2006 - 17:20 #3
Ellers kan f.eks indsætte et kriterie i forespørgslen således.

Like "*" & [text] & "*"

Og derefter blot åbne forespørgslen med:

docmd.openquery "din forespørgsel"
Avatar billede terry Ekspert
13. juli 2006 - 17:22 #4
This is assuming that .Mærke contains text values. If it is a number then use


docmd.OpenReport "ReportName",,,"[salg overdel].Mærke = " & Me.Tekst0

and this is very likley why you cant get your example to work
(type mismatch)
Avatar billede terry Ekspert
13. juli 2006 - 17:22 #5
DoCmd.OpenQuery stDocName, acNormal, "[salg overdel].Mærke= '" & Me.Tekst0 & "'"
Avatar billede legut Nybegynder
13. juli 2006 - 17:35 #6
To Terry, the one you wrote at 13/07-2006 17:20:06

This one works but

This one print out the report, it dosent show it on the screen. why does it do that?
Avatar billede terry Ekspert
13. juli 2006 - 17:41 #7
docmd.OpenReport "ReportName",acViewPreview ,,"[salg overdel].Mærke = '" & Me.Tekst0 & "'"
Avatar billede terry Ekspert
25. juli 2006 - 15:18 #8
thanks
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