AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

Docmd.openreport 'a Veri Alma

03/08/2019, 14:43

yakanic

Kod:
Private Sub Komut_Click()
On Error GoTo Err_Komut_Click

    Dim stDocName As String

    stDocName = "Y"
    DoCmd.OpenReport stDocName, acPreview

Exit_Komut_Click:
    Exit Sub

Err_Komut_Click:
    MsgBox Err.Description
    Resume Exit_Komut200_Click
   
End Sub

merhabalar buradaki açılır pencereye ekrandaki me.kimlik verisini elle girmeden otomatik almasini istiyorum.
Kod:
    DoCmd.OpenReport stDocName, acPreview, me.kimlik
yaptim aldi ama ekrandaki kişiyi değil alakasiz birisinin verilerini raporlaştirdi bunun için farkli bir komut mu kullanmak gerekiyor.
teşekkürler.
03/08/2019, 14:58

berduş

raporunuzda yer alan Me.kimlik hangi alana denk geliyor olanı da belirtmelisiniz
kendi örneğimde ID alanı me.kimlik kriterine göre filtrelendiği için onu yazdım
ayrıca me.kimlik"ten önce 2 virgül olacak
 DoCmd.OpenReport stDocName, acPreview, , "ID=" & Me.Kimlik
03/08/2019, 15:40

yakanic

(03/08/2019, 14:58)halily yazdı: raporunuzda yer alan Me.kimlik hangi alana denk geliyor olanı da belirtmelisiniz
kendi örneğimde ID alanı me.kimlik kriterine göre filtrelendiği için onu yazdım
ayrıca me.kimlik"ten önce 2 virgül olacak
Kod:
DoCmd.OpenReport stDocName, acPreview, , "ID=" & Me.Kimlik

teşekkürler hocam.
03/08/2019, 16:40

berduş

ÖD
iyi çalışmalar