05. maj 2003 - 14:14Der er
10 kommentarer og 2 løsninger
Find værdi i Access database?
Det er efterhånden et stykke tid siden jeg har arb. med Access. Jeg har en database over noget pc-udstyr. Der er flere forskellige tabeller f.eks. en med pc'er og en med printere. I hver tabel er der den kolonne med serienr.
Det jeg nu ønsker er at lede efter et serienr. Jeg har en liste med nogle serienr. som jeg ønsker at finde i databasen, hvis de er der. Der skal søges i alle tabeller ved en søgning. Hvordan klarer jeg det lettest?
Hvis du har data i en forespørgsel der inkluderer feltet "serienr", kan du indsætte et kriterie i forespørgslen i feltet "serienr":
Like "*" & [Forms]![form1]![serienr] & "*"
Eller benytte flg. VBA :
Dim SQLstr As String Dim serienr As String Dim MSG As String Dim Svar As Integer Dim Ctrl As Control DoCmd.GoToControl "serienr" serienr = InputBox(Prompt:="Indtastserienr:" & vbNewLine & vbNewLine, Title:="Find serienr") Me.RecordsetClone.FindFirst "serienr= '" & serienr & "'" While Me.RecordsetClone.NoMatch = True If Me.RecordsetClone.NoMatch = True Then Svar = MsgBox(Prompt:="serienr findes ikke", Title:="Søgningen lykkedes ikke") Exit Sub End If Me.RecordsetClone.FindFirst "serienr= '" & serienr & "'" Wend Me.Bookmark = Me.RecordsetClone.Bookmark
If I have understood your question correctly then mugs' solution "might" help if you already have a form showing the data, but I have a feeling you dont! So I would first suggest that you normalize your dB before you get too many problems :o) You shouldnt have a table for each hardware type! You should have one table containing the general information and one containing differnt hardware types.
In the table containing the general information you will have a field (foreign key) which references the hardware type table. This way you dont have a table for each type!
To Terry: It's an old db. I didn't make it. But I'm not planning to nomalize it. I'm not sure how much I'm gonna use it in the future. I think I start from scratch if I have to use it. To Mugs: Jeg er ikke helt med på hvad du mener med dit forslag? Men jeg håber at få tid til at kigge på det i morgen...
Indsættes i en forespørgsels kriteriefelt, og refererer til et felt i din formular. fungerer både med alfanumeriske og numeriske felter.
Den anden søgefunktion fungerer kun ved alfanumeriske felter, og er en søgefunktion programmeret i VBA.
Hvis du ikke er sikker på, hvor meget du skal bruge den i fremtiden, vil jeg absolut anbefale, at du skrotter den, og starter fra scratch for at få en normaliseret db. Jeg vil desuden vædde stort set hvad som helst på, at tabellerne ikke er optimale m.h.t. inputmasker, feltlængder m.v.
Synes godt om
Ny brugerNybegynder
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.