Altform kod çalışmıyor...
#1
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,



  Alıntı
Bu mesajı beğenenler:
#2
Alt formda "change" olayına yazmayı deneyebilirsiniz. benzer bir kodu formumda kullanıyorum. yalnız bu kodu alt formda bütün hücreler için kopyaladım. böylece hiçbir hücreye veri giremiyor ta ki ana formda formno kısmına bilgi girilinceye kadar.

Visual Basic
  1. Private Sub ÜRÜN_ADI_Change()
  2.  
  3. If IsNull(Form_STOKGİRİŞ.FORMNO) Then
  4. MsgBox ("ÖNCE ÜST ALANLARI DOLDURUNUZ")
  5. Undo
  6. Else
  7. End If
  8. Me![BİRİM] = ÜRÜN_ADI.Column(2)
  9.  
  10. End Sub





  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Güncelleme Sorgusu çalışmıyor ? karaayhan 3 420 05-04-2025, 22:08
Son Mesaj: karaayhan
access-sql-9 Altform Geçici Veri Eklenmesi Durumu alperalper 5 607 19-02-2023, 04:14
Son Mesaj: dsezgin
  Altform Verisine Göre Grafik Oluşturma Hk YENIFENER 2 579 16-11-2022, 11:25
Son Mesaj: dsezgin
access-sql-5 Access'te LıstboX Veya Altform Seçimine Göre Grafiğin Değişmesini Sağlamak. YENIFENER 19 2.126 14-11-2022, 09:48
Son Mesaj: YENIFENER
  Flash Bellekteki Belgelere Oluşturduğum Köprü, Farklı Pc'de çalışmıyor tarkanaykın 1 457 26-04-2022, 23:50
Son Mesaj: tarkanaykın
  [FORM] Form Açılmadan önce Progress Bar çalışmıyor. yenginoglu 3 414 12-02-2022, 01:30
Son Mesaj: dsezgin
  [FORM] Altform Filtreleme Sonucuna Göre Toplam Alma husem 6 731 10-01-2022, 01:14
Son Mesaj: husem
  çalışan Buton Makrosu Artık çalışmıyor airborne 5 640 20-09-2021, 12:04
Son Mesaj: celalll

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi