24-02-2010, 16:00
Merhaba,
If DCount("*", "Istgecis", "GRUP=forms.FLOOR_INFO.GRUP1") > 0 And İstasyon = "" Then
MsgBox "İstasyon Bilgisini girmeden geçiş yapamazsınız..."
Me.Undo
End If
Istgecis = Sorgu
FLOOR_INFO= Ana formum
DETAY_KATIL = Alt formum
İstasyon = DETAY_KATIL için bir hücrem
Yapmak istediğim alt formumda veri girerken;
Ana formumdaki (FLOOR_INFO) GRUP1 bilgisi ile Sorgulardaki Istgecis içindeki GRUP sütunu karşılaştıracak. Bilgi tutarlılığı var ise İstasyon hücresine bakacak boş ise MsgBox ekrana gelecek ve kayıt girişi engellenecek.
Bu kodu nereye yazacağım. Alt form olayına mı? Ana form olayına mı?
Not: Dosyam çok büyük olduğu için ekleyemedim.
Teşekkürler,
If DCount("*", "Istgecis", "GRUP=forms.FLOOR_INFO.GRUP1") > 0 And İstasyon = "" Then
MsgBox "İstasyon Bilgisini girmeden geçiş yapamazsınız..."
Me.Undo
End If
Istgecis = Sorgu
FLOOR_INFO= Ana formum
DETAY_KATIL = Alt formum
İstasyon = DETAY_KATIL için bir hücrem
Yapmak istediğim alt formumda veri girerken;
Ana formumdaki (FLOOR_INFO) GRUP1 bilgisi ile Sorgulardaki Istgecis içindeki GRUP sütunu karşılaştıracak. Bilgi tutarlılığı var ise İstasyon hücresine bakacak boş ise MsgBox ekrana gelecek ve kayıt girişi engellenecek.
Bu kodu nereye yazacağım. Alt form olayına mı? Ana form olayına mı?
Not: Dosyam çok büyük olduğu için ekleyemedim.
Teşekkürler,


