Kayıtlı bilgilere Listboxtaki veriye tıklayarak ulaşmak
Tarih
20/08/2009 23:21
Konu Sahibi
passenger
Yorumlar
4
Okunma
1464
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



passenger
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
53
15/07/2009
İzmir
Ofis 2007
10/10/2010,14:56
Çözüldü 
Merhaba arkadaşlar,
Herşeyden önce mubarek Ramazan ayınızı kutlarım. Kısaca sorunumdan bahsedeyim. Ekte de vermiş olduğum Access çalışmasında formdaki listbox'ta tıkladığım kişinin bilgilerini formdaki gerekli yerlerde görmek istiyorum, yani ulaşmak istiyorum. Birde yorum kısmında da farklı zamanlarda yazılan yorumları eskilerini silmeden history kısmına eklemesini istiyorum. Yardımcı olursanız sevinirim.Access 2003 formatına çevirdim.


Ek Dosyalar
.rar   Database2003.rar (Dosya Boyutu: 14,66 KB / İndirme Sayısı: 13)
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.060
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Dün,23:19
Çözüldü 
örneğinizi 2003 formatında (mdb) ekleyiniz.
Cevapla


gocebe
Aktif Üye
Kullanici Avatari
Aktif Üye
57
3
26/02/2009
14
İstanbul
Ofis 2013 64 Bit
11/04/2016,14:52
Çözüldü 
sayın passenger;
liste kutusu tıklandığında ismin benzer olduğu ilk kayda sıçrıyor. ancak bir bana mantık hatası var gibi geldi. kisi isimleri mükerrer olduğunda ilk bulduğuna sıçrayacaktır. tavsiyem ilişikli tablo kullanmak ve benzersiz alanlar ile iki tabloyu ilikşilendirmektir.
ikincisi yorum geçmisi hakkında ilişiksiz ikinci bir not alanı ekledim. kayıt içerikleri görünecektir. yeni yorumunuzu YorumHistory yazdıktan sonra historye ekle butonu ile tablonuz ile ilişkili not alanına aktarmasını sağladım. kodları ve yeni db inceleyiniz.

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Command15_Click()
Me.YorumHistory = Me.YorumHistory & " / " & Now() & " " & Me.YorumHistory1
Me.Refresh
End Sub

Private Sub List13_Click()
'SECİLEN PERSONEL KAYDINI BUL VE ONA SIÇRA
Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Kişi] = '" & Me.List13 & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub

Private Sub List13_GotFocus()
 Me.List13.Requery
End Sub



Ek Dosyalar
.zip   Database2003.zip (Dosya Boyutu: 17,27 KB / İndirme Sayısı: 57)
Cevapla


passenger
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
53
15/07/2009
İzmir
Ofis 2007
10/10/2010,14:56
Çözüldü 
Sayın gocebe,
Yardımlarınız için çok teşekkür ederim. Gerçekten her işin bir yolunun olduğunu birkez daha gördüm. Zihninize sağlıkAngel
Cevapla


ay_yildiz197908
Hesap Aktif Değil
Kullanici Avatari
Aktivasyon Bekleyen
22
5
02/11/2008
Bolu
Ofis 2003
14/03/2010,13:11
Çözüldü 
passenger öncelikle teşekkürler

bunu nasıl yaptın göresel olarak anlatabilirmisin

saygılar
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Liste Kutusunda Veriye Ait Numaranın Görünme Sorunu emre_0147 5 429 01/01/2016, 16:41 emre_0147
Çözüldü Kayıtlı değil uyarısı alıyorum aurer 2 302 25/12/2015, 00:03 ozanakkaya
  access veri tabanı kayıtlı veriyi değiştirirken hata Emre Dy 3 373 25/11/2015, 13:09 atoz112
Çözüldü Alt Forumdaki Veriyi Tıklayarak Diğer Alt Forumdaki Verileri Filtrelemek sfenksturk 4 639 22/09/2015, 23:24 sfenksturk
Çözüldü Rapordaki kayda tıklayarak formdaki kayda gitme... oomerrrr 4 711 09/07/2015, 18:54 oomerrrr


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya