Sayın hocalarım,
Hemen hemen hergün sizlerden yeni birşeyler öğreniyoruz. Bizlere zaman ayırdığınız için sizlere çok teşşekkür ediyorum.
Soruma Gelince.
Yapmış olduğum programda personel bilgilerini gösteren bir formum var.
Başka bir form da ise izin takip bilgileri var.
Personel bilgilerinin olduğu forma bir buton koyarak İZİN TAKİP formunu açtırıyorum.
Benim istediğim. Personel bilgilerinde o an için kimin kaydı bulunuyorsa izin butonuna tıkladığımda da o kişinin kaydının açılmasıdır.
PERSONEL BİLGİLERİ on load kısmında yazan KOD aşağıdaki gibi
Private Sub persid_Click()
On Error GoTo Err_persid_Click
stDocName = "Personelid"
DoCmd.OpenReport "Personelid", acViewPreview, , "[Adı Soyadı]=Forms![Personel ID]![Adı Soyadı]"
Exit_persid_Click:
Exit Sub
Err_persid_Click:
MsgBox Err.Description
Resume Exit_persid_Click
End Sub
İZİN BİLGİLERİNDE ise
Private Sub Form_Load()
DoCmd.Maximize
End Sub
BAŞKA bir kaç yol denedim ama olumsuz.
YARDIMLARINIZI BEKLİYORUM
Saygılar
örnek eklerseniz çözülür sanıyorum
DoCmd.OpenReport "Personelid", acViewPreview, , "[Adı Soyadı]='" & Forms![Personel ID]![Adı Soyadı] & "'" olarak deneyiniz.
ORNEK EKLENMİŞTİR
Sayın hocalarım,
Hemen hemen hergün sizlerden yeni birşeyler öğreniyoruz. Bizlere zaman ayırdığınız için sizlere çok teşşekkür ediyorum.
Soruma Gelince.
Yapmış olduğum programda personel bilgilerini gösteren bir formum var.
Başka bir form da ise izin takip bilgileri var.
Personel bilgilerinin olduğu forma bir buton koyarak İZİN TAKİP formunu açtırıyorum.
Benim istediğim. Personel bilgilerinde o an için kimin kaydı bulunuyorsa izin butonuna tıkladığımda da o kişinin kaydının açılmasıdır.
PERSONEL BİLGİLERİ on load kısmında yazan KOD aşağıdaki gibi
Private Sub persid_Click()
On Error GoTo Err_persid_Click
stDocName = "Personelid"
DoCmd.OpenReport "Personelid", acViewPreview, , "[Adı Soyadı]=Forms![Personel ID]![Adı Soyadı]"
Exit_persid_Click:
Exit Sub
Err_persid_Click:
MsgBox Err.Description
Resume Exit_persid_Click
End Sub
İZİN BİLGİLERİNDE ise
Private Sub Form_Load()
DoCmd.Maximize
End Sub
BAŞKA bir kaç yol denedim ama olumsuz.
YARDIMLARINIZI BEKLİYORUM
Saygılar
sayın power;
rapor değil form açtıracak sanırım.