+- 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ığı: Tabloda kesişen kayıdın bulunup silinmesi (/konu-tabloda-kesisen-kayidin-bulunup-silinmesi.html)
Tabloda kesişen kayıdın bulunup silinmesi - nightashes - 18/12/2016
Merhaba,
![[Resim: do.php?imgf=148205570756761.png]](https://accesstr.net/resim/do.php?imgf=148205570756761.png)
Listede seçili kaynağın bulunup listeden kaldırılmasını sağlamaya çalışmaktayım. Bunun için kod kısmına aşağıdaki gibi bir uygulama yapmaya çalıştım.
![[Resim: do.php?imgf=148205570766042.png]](https://accesstr.net/resim/do.php?imgf=148205570766042.png)
Görülceği üzere and komutu ile kesişen kayıdı buldurmaya çalıştım fakat hata vermekte. And komutu olmadan sorunsuz çalışıyor ama and komutu koyup kesişeni buldurmaya çalıştım acaba sorunu nasıl düzeltirim.
nightashes18122016_1.rar
(Dosya Boyutu: 53,48 KB | İndirme Sayısı: 2)
Cvp: Tabloda kesişen kayıdın bulunup silinmesi - nightashes - 18/12/2016
Kod:
Dim rS As New ADODB.Recordset
rS.Open "SELECT ReceteTaslakNo FROM T_RECETETASLAKMALIYET WHERE ReceteTaslakNo =" & Me.taslakno & " And HmmdNo = " & Me.hmmdno2, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rS.Delete
rS.Close
Me.lst_hmmdliste.RequeryTeşekkürler. Cevaplandıya taşınabilir veya silinebilir.