+- 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ığı: Liste Kutusuna Çift Tıklamada Veri Türü Problemi (/konu-liste-kutusuna-cift-tiklamada-veri-turu-problemi.html)
Liste Kutusuna Çift Tıklamada Veri Türü Problemi - farukozgursoy - 14/09/2022
Merhabalar. Bir tablomla ilişkili alt tablom mevcut. Liste kutusunda müşteri listesine tıkladığımda ilgili formu açmasını istiyorum. Bunun kod satırında veri türlerine takıldım.
Müşteri Listesi tablosu ile işlem kayıt tablosu ilişkili. Otomatik numara ve isim soyisim ile. Sıra numarası benzersiz olduğu için bu şekilde düşündüm. İşlem kayıt tablosundaki isim kısmının türünü sayı yaptım ki ilişkide sorun olmasın ve listedeki 2. kişinin kaydı şeklinde olarak görünsün diye. Ancak liste kutusunda çift tıklama olayına
Private Sub LST_CARI_LISTESI_DblClick(Cancel As Integer)
DoCmd.OpenForm "MUSTERI_ISLEMLER", , , "[MUSTERI_ADI]='" & Me.LST_CARI_LISTESI.Column(1) & "'"
End Sub
Şimdiden teşekkürü bir borç bilirim.
RE: Liste Kutusuna Çift Tıklamada Veri Türü Problemi - aydin5353 - 14/09/2022
Hocam örnek koysaydınız kendim uyguladığım bir kodu deneme fırsatım olurdu. Ancak eklemediğiniz için benim taslağımda uyguladığım kodu paylaşıyorum. Umarım istediğinize ulaşırsınız.
Dim acilacak_form As String
Dim kriter As String
acilacak_form = "AÇILACAKFORMADINIYAZIN"
kriter = "[Kimlik]=" & Me![LİSTEADINIYAZIN]
DoCmd.OpenForm acilacak_form, , , kriter
‘EĞER FARKLI BİR FORMA GEÇİLECEKSE ALTTAKİ KODU EKLEYİN.
‘DoCmd.Close acForm, "KAPATILACAKFORMADINIYAZIN"
RE: Liste Kutusuna Çift Tıklamada Veri Türü Problemi - farukozgursoy - 14/09/2022
(14/09/2022, 21:59)aydin5353 yazdı: Hocam örnek koysaydınız kendim uyguladığım bir kodu deneme fırsatım olurdu. Ancak eklemediğiniz için benim taslağımda uyguladığım kodu paylaşıyorum. Umarım istediğinize ulaşırsınız.
Dim acilacak_form As String
Dim kriter As String
acilacak_form = "AÇILACAKFORMADINIYAZIN"
kriter = "[Kimlik]=" & Me![LİSTEADINIYAZIN]
DoCmd.OpenForm acilacak_form, , , kriter
‘EĞER FARKLI BİR FORMA GEÇİLECEKSE ALTTAKİ KODU EKLEYİN.
‘DoCmd.Close acForm, "KAPATILACAKFORMADINIYAZIN"
Buradaki problemim maalesef 2 farklı veri türünü ilişkilendirebilmekti. Ancak bunu yapamadığım için bende gereksiz bir şekilde sıra numaraları ile isimleri eşitleyip ilişkilendirmede bunları kullandım. Değerli cevabınız için teşekkür ederim. Bunu da deneyeceğim, size sonucu yazayım.
RE: Liste Kutusuna Çift Tıklamada Veri Türü Problemi - C*e*l*o*y*c*e - 15/09/2022
(14/09/2022, 20:39)farukozgursoy yazdı:yazdığımda integer olduğundan dolayı hata alıyorum. Bu kod satırında nasıl bir değişiklikle hata almayı önlerim. Umarım anlatabilmişimdir, karıştı biraz.Private Sub LST_CARI_LISTESI_DblClick(Cancel As Integer)
DoCmd.OpenForm "MUSTERI_ISLEMLER", , , "[MUSTERI_ADI]='" & Me.LST_CARI_LISTESI.Column(1) & "'"
End Sub
Şimdiden teşekkürü bir borç bilirim.
eger
DoCmd.OpenForm "MUSTERI_ISLEMLER", , , "[MUSTERI_ADI]='" & Me.LST_CARI_LISTESI.Column(1) & "'"
alan sayı ise
'" & Me.LST_CARI_LISTESI.Column(1) & "' burayı
" & Me.LST_CARI_LISTESI.Column(1) & "
şekilde (tek tırnagı kaldırıp) deneyin
RE: Liste Kutusuna Çift Tıklamada Veri Türü Problemi - farukozgursoy - 17/09/2022
Teşekkür ederim