Avatar billede midgaardsorm Nybegynder
26. juli 1999 - 12:41 Der er 8 kommentarer og
1 løsning

Søgefunktion

Jeg har lavet en db, hvor det skal være muligt, efter valg af sted og maskine i kombinationsbokse, at se de records der indeholder værdierne, i tabrelform.
De to kombinationsbokse er afhængige af hinanden, et valg i den ene begrændser valgmulighederne i den anden.

Hvordan kæder jeg det sammen med visningen ???? evt. underformular !!
Avatar billede ricky Nybegynder
26. juli 1999 - 13:07 #1
Hej,

du sætter .rowsource property i 'GotFocus'

- skriv hvis du skal bruge mere info.
Avatar billede midgaardsorm Nybegynder
26. juli 1999 - 14:20 #2
Jeg vil prøve.......svar kommer Tirsdag !!!
Avatar billede Slettet bruger
26. juli 1999 - 14:40 #3
DU kan også sætte rowsource i Afterupdate på den ene kombinationsbox.
Dette giver bedre performance idet Access så ikke vil køre forespørgslen til rowsource hver gang den får fokus, men kun når der ændres i den første.
Avatar billede midgaardsorm Nybegynder
26. juli 1999 - 14:52 #4
Dybere forklaring er nødvendig :
1. kombo : sted
2. kombo : Maskine

Ønskes tabelvisning over poster hvor begge indgår !

Meget nøjagtig forklaring, hvis det er muligt, tak !!!!!
Avatar billede midgaardsorm Nybegynder
27. juli 1999 - 10:32 #5
Problemet er løst ved egen hjælp !!!

Tak for forsøget ! og undskyld ulejligheden
Avatar billede gertnissen Nybegynder
25. august 1999 - 22:29 #6
Hvordan løste du det MIDGAARDSORM, måske andre kunne lære noget, det er trods alt tanken bag eksperten.dk !
Avatar billede midgaardsorm Nybegynder
26. august 1999 - 17:29 #7
Kode kommer, i løbet af få dage !!!
Avatar billede midgaardsorm Nybegynder
27. august 1999 - 09:05 #8
Her er koden uden kommentarer !!!

Option Compare Database
Option Explicit

Private Sub Detaljesektion_DblClick(Cancel As Integer)
  Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "Henvendelse_enkelt"
    stLinkCriteria = "[HenvendID]=" & Me![HenvendID]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
End Sub

Private Sub Form_AfterUpdate()
    Me![vælg maskine].Requery
End Sub

Private Sub Vælg_center_AfterUpdate()
    Me![vælg maskine].Enabled = True
    Me![vælg maskine].Requery
    AktiverKontrolelementer Me, acDetail, False
End Sub

Private Sub Vælg_center_GotFocus()
    Me![vælg maskine].Enabled = False
End Sub

Private Sub Vælg_maskine_AfterUpdate()
    DoCmd.ApplyFilter , "maskine" = Forms!søgning_temp![vælg maskine]
    AktiverKontrolelementer Me, acDetail, True
    Me![vælg maskine].Requery
    Me.FilterOn = False
End Sub

Private Sub Kommandoknap24_Click()
    Me.Requery
End Sub

Formularen består af to kombinationbokse(Center og maskine), og giver resultatet i listeform !
Avatar billede midgaardsorm Nybegynder
30. august 1999 - 07:55 #9
For af lukke spørgsmålet
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