20. februar 2005 - 21:25Der er
7 kommentarer og 1 løsning
Hjælp til kombinationssøgning
I min formular, kunne jeg godt tænke mig at lave en kombinationssøgning på felterne cpr nummer og fornavn. Koden ser indtil videre sådan ud og fungerer også fint, hvis både cpr nummer og fornavn udfyldes i søgeformularen.
Men jeg ønsker at det skal være sådan at jeg kan efterlade en af felterne blanke, så der kun søges på det ene udfyldte søgekriterie. Det må gerne være sådan at felterne er med fritekst, dvs. jokertegn både før og efter det indsatte søgekriterie.
If Me!Cpr <> "" Then SQLStr = SQLStr & "[cpr nummer] = '" & Me!CPR & "' And " End If If Me!Fornavn <> "" Then SQLStr = SQLStr & "[Fornavn] = '" & Me!Fornavn & "' And " End If If len(SQLStr) = 0 Then DoCmd.OpenForm "log" else SQLStr = Left(SQLStr, Len(SQLStr) - 5) DoCmd.OpenForm "log",,,SQLStr End If
Jeg har set databasen på siden du nævner mugs, og jeg benytter også løsningen i en anden database og det fungerer rigtig godt. Den er dog ikke så god i den her situation. Det sidste eksempel virker, men dog ikke så der kan søges på fritekst. Det skal være med jokertegn i koden, både foran og bagved teksten
If Me!Cpr <> "" Then SQLStr = SQLStr & "[cpr nummer] Like '*" & Me!CPR & "*' And " End If If Me!Fornavn <> "" Then SQLStr = SQLStr & "[Fornavn] Like '*" & Me!Fornavn & "*' And " End If If len(SQLStr) = 0 Then DoCmd.OpenForm "log" else SQLStr = Left(SQLStr, Len(SQLStr) - 5) DoCmd.OpenForm "log",,,SQLStr End If
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.
