+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Aynı Kayıt Kontrol Kodu 2 Farklı Sonuç... (/konu-ayni-kayit-kontrol-kodu-2-farkli-sonuc.html)
Aynı Kayıt Kontrol Kodu 2 Farklı Sonuç... - Oğuz Türkyılmaz - 08/02/2019
Merhabalar
F_006_PortfoyTanimlama formumda verileri girerken müşteri adı alanında aynı müşterinin daha önce girilmiş kayıtları varsa F_005_PortfoyListesinde ilgili kayıtları filtreleyerek görmek amacıyla aşağıdaki kodu yazdığımda ana projemde....
aşağıdaki hata mesajını aldım.
Bu hatayla ilgili foruma yükleyeceğim sadece ilgili tablo, sorgu ve formları içine aktardığım dosyayı kontrol amaçlı çalıştırdığımda ise hata almadım ve ilgili form aşağıdaki şekilde açıldı.
Amacım örnekten yola çıkacak olursam portföy tanımlama ekranında yeni kayıt girerken mehmet doğan ismini girdiğimde bana Portföy listesinde sadece mehmet doğan ismiyle girilmiş kayıtları süzerek getirmesi.
NOT:Kayıtlar internetten çekildiği için herhangi bir gizliliği yoktur.
Cvp: Aynı Kayıt Kontrol Kodu 2 Farklı Sonuç... - ozanakkaya - 08/02/2019
İlk resimdeki kodu aşağıdaki ile değiştirerek deneyiniz.
Dim varmi As Integer
varmi = DCount("txtMusteriAdi", "TBL_PORTFOY", "AdiSoyadi='" & Me.txtMusteriAdi & "'")
If varmi >= 1 Then
If MsgBox("Bu Müşteri adına Portföy kaydedilmiş. Kayıtları kontrol etmek istermisiniz.?", vbExclamation + vbYesNo) = vbYes Then
DoCmd.OpenForm "F_005_PortfoyListesi", , , "[AdiSoyadi]='" & Me.txtMusteriAdi & "'", , , Me.txtMusteriAdi
Forms![F_005_PortfoyListesi].[SRG_AltForm].Form.Filter = "([SRG_PORTFOY alt formu].[Adisoyadi]='" & Me.txtMusteriAdi & "')"
Forms![F_005_PortfoyListesi].[SRG_AltForm].Form.FilterOn = True
End If
End IfCvp: Aynı Kayıt Kontrol Kodu 2 Farklı Sonuç... - Oğuz Türkyılmaz - 08/02/2019
Ozan Bey Cevabınız için teşekkür ederim. Foruma yüklediğim ana projeye kodu yazdığımda yine hata mesajı alıyorum fakat foruma yüklemek için ilgili tablo form ve sorguları transfer ederek oluşturduğum 2. veritabanında kod istenen değerleri getiriyor. Aralarında bir fark yok, sadece yeni Access projesi oluşturup dosyaları transfer ettiğim VT'da çalışmasını bir türlü anlayamıyorum. Ne yapmam lazım gerçekten şaşırdım. Çalışan projedeki formu tekrar ana projeye transfer edip bir de öyle deneyeceğim.
Cvp: Aynı Kayıt Kontrol Kodu 2 Farklı Sonuç... - Oğuz Türkyılmaz - 08/02/2019
Ana projedeki formları iptal edip Foruma yüklemek için oluşturduğum VT 'dan çalışan formları ana projeye geri transfer ettim bu şekilde ana projemde de kodların çalışmasını sağladım. Sorunun kaynağını tespit edememe kle beraber sorunumu bu şekilde çözümledim. Tekrar teşekkür ederim.