(22/02/2024, 23:28)NDMGNR yazdı: Haklısın hocam.
Gizli tabloları ve sorguları göremeyeceğini akıl edemedim. Gezinti seçeneklerinden "gizli nesneleri göster" seçeneğini açarsanız bahsettiğim sorguları görürsünüz.
Çok özür dilerim +30 yıllık yazılımcı ve bu işin uzmanı olarak bilmiyordum (!) gizli nesneleri nasıl göreceğimi sayenizde öğrenmiş oldum. Site Kuralları ve duyurularda açıkça ve cezai yaptırımı olacağını vurgulayarak, örneğinizde sorunuza ait form, rapor, sorgu, bunların kaynağı tablolar dışında herşeyi silin ve gizli öğe, gerçek kişi ve firma bilgileri kesinlikle paylaşmayın diye defalarca belirttik. Burada yardımcı olabilmek adına günlük iş yükümüzden kaynaklı yoğun tempoda olmayan zamanımızdan kısıp sizlere destek olmaya çalışıyoruz, gizli nesneler mi var kontrol et, işleyiş mantığı açıklanmamış uygulamayı analiz et anla, sizin örneğinizde olduğu gibi KesilmisForm demiş ama KesilmislerForm var acaba yanlış mı yazıldı yoksa eklenmedi mi kontrol et gibi ekstra işlemlerle uğraşacak lüksümüz yok. Keşke olsa canlı dersler hazırlayıp katılımcılara öğretsek gibi projelerimizi hayata geçirebilsek. Keza benzeri sorunlar yaşayan arkadaşlar da sizler gibi yardım ararken henüz yeni öğreniyor alabilir onların fayda sağlaması anlamında da örneklerinizin net görülür yapıda olması gerekiyor.
Sorunuza gelirsek nasıl kontrol ekleyeceğinizin cevabını zaten yukarıdaki mesajımda vermiştim. KesilmislerForm'unuzda ArabaNo textboxının güncelleştirme sonrasında olayına
If Dlookup ("ArabaNolar", "ArabaNolar", "Arabanolar='" & ArabaNo & "'") = True Then
Exit Sub
Else
MsgBox "Geçerli Araba No Giriniz", vbCritical + vbOKOnly, "ARABA NO HATALI"
End If
