Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
20/08/2009 23:21
Konu Sahibi
passenger
Yorumlar
4
Okunma
1921
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.875
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,02:14
Çö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
20/09/2017,11:57
Çö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ü Sorguda Veriye Göre Kriter Oluşturma okumas 2 278 12/03/2017, 11:41 okumas
Çözüldü Liste Kutusunda Veriye Ait Numaranın Görünme Sorunu emre_0147 5 698 01/01/2016, 16:41 emre_0147
Çözüldü Kayıtlı değil uyarısı alıyorum aurer 2 497 25/12/2015, 00:03 ozanakkaya
Çözüldü access veri tabanı kayıtlı veriyi değiştirirken hata Emre Dy 3 530 25/11/2015, 13:09 atoz112
Çözüldü Alt Forumdaki Veriyi Tıklayarak Diğer Alt Forumdaki Verileri Filtrelemek sfenksturk 4 887 22/09/2015, 23:24 sfenksturk

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.