Hizmet Cetveli Arama Butonu

1 2 3
19/09/2019, 21:29

cdenktas

İyi akşamlar arkadaşlar;

Çalıştığım yerde kıdem tazminatı hesaplama sırasında istemiş oldukları bir hizmet cetveli var. Elimden geleni yapmaya çalıştım ancak T.C kimlik no ile verileri tablodan getirdiğimde veriler geliyor ama dosyayı kapatıp açtığımda en son aradığım verinin bilgileri tablo dizisinin 1. satırındaki isim, doğum yeri gibi değerleri değiştiriyor, tabloda hiçbir değişiklik yapmaması gerekiyor. Bu konuda yardımcı olabilir misiniz?
19/09/2019, 21:52

berduş

sorunun sebebi hem formunuzun hem de bazı alanların tabloya bağlanmış olması.
form tabloya bağlanmış olduğundan açılır açılmaz ilk kayda ait bilgileri getiriyor
siz de bağlı olan alanları değiştirince işlem doğrudan tabloya kaydediliyor.
ara butonunun kodunu aşağıdaki kodla değiştirip dener misiniz?
Kod:
Me.Filter = "[T C Kimlik No]= '" & Me.kimlikno_goster & "'"
Me.FilterOn = True

ufak bir hatırlatma ya bütün alanları bağlayın tabloya yada hiç birini bağlamayın yarı ondan yarı bundan sorun çıkarır
tablodaki bütün alanları bağlasanız da hiç birini bağlamasanız da arama kutusunu tablodan bağımsız yapın
19/09/2019, 22:32

cdenktas

(19/09/2019, 21:52)berduş yazdı: sorunun sebebi hem formunuzun hem de bazı alanların tabloya bağlanmış olması.
form tabloya bağlanmış olduğundan açılır açılmaz ilk kayda ait bilgileri getiriyor
siz de bağlı olan alanları değiştirince işlem doğrudan tabloya kaydediliyor.
ara butonunun kodunu aşağıdaki kodla değiştirip dener misiniz?
Kod:
Me.Filter = "[T C Kimlik No]= '" & Me.kimlikno_goster & "'"
Me.FilterOn = True
Elinize sağlık ama ben daha acemi olduğumdan kodu nereye yapıştıracağım, kusura bakmayın. Diğer kodları da videolardan dinleyerek yaptım...
19/09/2019, 23:29

berduş

formda "T.C. ara" butonu var onun kodu
Kod:
Private Sub Ara_Click()
Me.Filter = "[T C Kimlik No]= '" & Me.kimlikno_goster & "'"
Me.FilterOn = True
End Sub

önceki mesajımdan farklı bir yöntem kullandım
dilerim işinize yarar,
iyi çalışmalar
Güncellenmiş Dosya
21/09/2019, 17:51

cdenktas

Hocam çok teşekkür ederim, emeğine sağlık. Allah razı ol... Çok teşekkürler ederim  tekrar....
Hocam birde ben çıktı aldığımda Aranacak T.C No çıktı sayfasında birde Kişisel Bilgiler ektra sayfanın altında diğer bir isimde çıkıyor. aradığım T.C ait bilgilerin çıktısını nasıl alabilirim...
'Çok teşekkür ederim hocam emeğine sağlık. Bir sorum daha olacaktı. Çıktı aldığımda sayfanın altında 2. verinin bir kısım geliyor. sadece arama yaptığım T.C. ile ilgili bilgileri yazıcıda nasıl getirebilirim. Çok teşekkür ederim.
(19/09/2019, 23:29)berduş yazdı: formda "T.C. ara" butonu var onun kodu
Kod:
Private Sub Ara_Click()
Me.Filter = "[T C Kimlik No]= '" & Me.kimlikno_goster & "'"
Me.FilterOn = True
End Sub

önceki mesajımdan farklı bir yöntem kullandım
dilerim işinize yarar,
iyi çalışmalar
21/09/2019, 19:10

berduş

çıktı alma yönteminiz ne?
hangi kodu kullanıyorsunuz?
eğer rapor halinde ise raporda bahsettiğiniz sorunun olmaması gerek, çalışmanızın son halini eklerseniz ona göre çözüm bulmaya çalışırız.
1 2 3