İlgili bilgileri metin kutularına getirtemiyorum.

23/05/2009, 14:03

yoguz

Merhaba arkadaşlar,
Ekteki çalışmamda calisanlar formunda bulunan liste üzerindeki isme tıkladığımda o kişiyle ilgili bilgileri metin kutularına getirtemiyorum. Ölçüt ifadesinde veri uyuşmazlığı hatası veriyor. Konu hakkında yardımcı olabilirmisiniz.
Teşekkür ederim.
23/05/2009, 14:31

Puletin

Liste Kutunuzun kodunu bununla değiştirin

Kod:
Private Sub Liste_AfterUpdate()
' Denetime uyan kaydı bul.
   Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[tckimlikno] = '" & (Nz(Me![Liste], 0)) & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
23/05/2009, 15:24

yoguz

Sn. Puletin çok teşekkür ederim..
iyi çalışmalar.
23/05/2009, 15:27

Puletin

Rica ederim ...
Sorununuzun çözüldüğünü varsayarak Konuyu taşıyorum...
Kolay gelsin...