Tabloda kesişen kayıdın bulunup silinmesi

18/12/2016, 13:11

nightashes

Merhaba,

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.

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.
[attachment=26143]
18/12/2016, 13:53

nightashes

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.Requery

Yazımı ile sorunumu düzelttim. Sayın atozun bir önceki cevabına bakarak & işeretini eksik kullandığımı anladım.

Teşekkürler. Cevaplandıya taşınabilir veya silinebilir.