Formda Veriler Kayboluyor...
Tarih
17/02/2013 06:10
Konu Sahibi
mozuer
Yorumlar
2
Okunma
1010
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



mozuer
Aktif Üye
Kullanici Avatari
Aktif Üye
M.... Ö....
85
26/12/2009
16
Kocaeli
Ofis 2013 Tr. 32 Bit
29/11/2016,22:01
Çözüldü 
ISTAKIP” formunda;
1. Köy Adı ve/veya Köy Mahallesi seçildiğinde “Semt, Cadde ve Diğer” seçilemeyecek,
2. Semt ve/veya Cadde seçildiğinde “Köy, Köy Mahallesi ve Diğer” seçilemeyecek,
3. Diğer seçildiğinde “Köy, Köy Mahallesi, Semt, Cadde” seçilemeyecek,
Yukarıdakileri Güncelleştirme sorgusu ile ya da ilgili alanın güncelleştirme sonrası olayında diğerlerine Null değeri atayarak yapıyorum. Ancak;
Örneğin Köy Adı ve Köy Mahallesinde veri olduğunu varsayalım. Bir alt satırda Semt seçimi yapıldığında Köy Mahallesindeki veri kayboluyor. Aynı şekilde Semt ve Caddede veri varken alt satırda Köy seçildiğinde Cadde kayboluyor….
Bu verilerin gözükmesini istiyorum. Yardımlarınızı bekliyorum…


Ek Dosyalar
.rar   YOLFORM.rar (Dosya Boyutu: 244,2 KB / İndirme Sayısı: 12)
Her insan senin gibi yaradılışa sahiptir.
Cevapla


fatih karagöl
Aktif Üye
Kullanici Avatari
Aktif Üye
167
05/10/2010
88
Edirne
-
15/12/2015,17:38
Çözüldü 
Sn Mozuer
Alt forma modülüne 3 fonksiyon ekledim. bunları ekleyin ve ilgili denetimlerin after update olaylarını makrodan alıp aşağıdaki gibi düzenleyin. istediğiniz gibi olacaktır. ben Sadece köy bölümlerini düzenledim. diğerlerini size bıraktım.

Private Sub ky_AfterUpdate()
If grup2Value = True Then
MsgBox "Mahalle grubunda bilgi bulunduğundan seçim yapamazsınız"
Me.ky = dbNull
Exit Sub
End If
If grup3Value = True Then
MsgBox "Diğer bölümünde bilgi bulunduğundan seçim yapamazsınız"
Me.ky = dbNull
Exit Sub
End If
End Sub



Private Sub kym_AfterUpdate()
If grup2Value = True Then
MsgBox "Mahalle grubunda bilgi bulunduğundan seçim yapamazsınız"
Me.kym = dbNull
Exit Sub
End If
If grup3Value = True Then
MsgBox "Diğer bölümünde bilgi bulunduğundan seçim yapamazsınız"
Me.kym = dbNull
End If
End Sub
Function grup1Value() As Boolean
If Me.ky <> "" Then grup1Value = True
If Me.kym <> "" Then grup1Value = True
End Function
Function grup2Value() As Boolean
If Me.sm <> "" Then grup2Value = True
If Me.smh <> "" Then grup2Value = True
End Function
Function grup3Value() As Boolean
If Me.dg <> "" Then grup3Value = True
End Function
Hayatta listbox kullanmam..
Cevapla


mozuer
Aktif Üye
Kullanici Avatari
Aktif Üye
M.... Ö....
85
26/12/2009
16
Kocaeli
Ofis 2013 Tr. 32 Bit
29/11/2016,22:01
Çözüldü 
Sn.fatih karagöl;
Teşekkür ederim...
Her insan senin gibi yaradılışa sahiptir.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Formda İsim yazdığımda tablodan veri gelmesi 53rize 6 153 27/11/2016, 13:36 53rize
  Bugünki Tarihden önceki veriler 53rize 8 131 27/11/2016, 13:18 53rize
  Access Formda Tümünü Seç Buton Olay Yordamı Ekleme ? mehami 7 292 25/11/2016, 18:36 mehami
  Formdaki bir alan göre alt formda alanları gizleme enderya 2 80 20/11/2016, 19:34 ozanakkaya
  Alt Formda Satır Silindiğinde Yeniden Hesaplatmak shalala 2 141 17/11/2016, 09:44 shalala


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