Avatar billede bosstec Nybegynder
03. februar 2010 - 21:14

Link problemer mellem formularer

Jeg har en form med en listbox, hvor jeg kan vælge post ud fra listboxen. Koden er følgende (after update):

Private Sub SiteList_AfterUpdate()
    ' Find the record that matches the control.
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[SiteID] = '" & Me![SiteList] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub

Den virker fint og er lavet med guiden.

I en anden form som er fortløbene, har jeg lavet en funktion som åbner den post som man dobbelt-klikker på, i den første form. Altså når man dobbelt-klikker på en post i form 2 åbner posten i form 1. Følgende kode er brugt:

Private Sub Detail_DblClick(Cancel As Integer)
On Error GoTo Err_Detail_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Site"
   
    stLinkCriteria = "[ID]=" & Me![ID]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Detail_Click:
    Exit Sub

Err_Detail_Click:
    MsgBox Err.description
    Resume Exit_Detail_Click
   
End Sub

Dette virker også fint.

Problemet er, at linken mellem min listbox og felterne i form 1 ikke virker efter at jeg har klikket på en post i form 2. Det virker som om at jeg har mistet linket. Jeg bliver nød til at lukke og åbne form 1 før at den virker igen.

Hvad skal jeg tilføje i den første kode for at gen-etablere link mellem listbox og felterne på form 1?
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