Mam dwie tabele w relacji. Chodzi o osoby, ktore maja dzieci. Tabele Osoby z kolumnami:
idOsoby (klucz glowny), PESEL, Imie, Nazwisko.
Tabela Dzieci z kolumnami:
idDzieci (klucz glowny), idOsoby (klucz obcy), Imie, Wiek
Zrobilem do tego Raport, ktory wyswietla zarowno dane osoby, jak i pod spodem dane wszystkich dzieci, ktore ma ta osoba. Raport ten jest z filtrem PESEL, czyli przy otworzeniu go, trzeba podac PESEL osoby.
Do tego zrobilem formularz z podformularzem, ktory pozwala np. zmienic dane kazdej osoby i dzieci, ktore sa do niej przyporzadkowane. Na tym formularzu umiescilem przycisk otwierajacy ww. raport, tylko trzeba za kazdym razem wprowadzic PESEL osoby, a ja chcialbym, aby raport sam pobieral PESEL z formularza tej osoby, ktora aktualnie jest wybrana.
Przy takiej procedurze:
Private Sub Polecenie34_Click()
On Error GoTo Err_Polecenie34_Click
Dim stDocName As String
If IsNull(Me![Pesel]) Then
MsgBox "Wprowadź PESEL przed podglądaniem."
Else
stDocName = "Raport"
DoCmd.OpenReport stDocName, acPreview, , Me![Pesel]
End If
Exit_Polecenie34_Click:
Exit Sub
Err_Polecenie34_Click:
MsgBox Err.Description
Resume Exit_Polecenie34_Click
End Sub
Pobiera mi zawsze PESEL pierwszego rekordu z tabeli Osoby i wyswietla dane, niezaleznie od tego, ktory rekord jest aktualnie wyswietlany na formularzu. Jak poprwic ten skrypt?