Skip to main content

AccessTr.neT


Formda Silinen Kaydı Tabloya Kopyalama

Formda Silinen Kaydı Tabloya Kopyalama

Çözüldü #1
Arkadaşlar merhaba nasılsınız. Konu ile ilgili sayfada birçok örnek mevcut, derdime deva olacak olanı buldum ancak ben yapamadım yardımcı olur musunuz? Örnek olarak eklediğim form kayıt sil butonu olmadan satırı seçip delete tuşuna basıldığında formun silme olayında silme gerçekleştiriyor. Bunun için aşağıdaki kodu kullandım. Kod çalışıyor silme işleminden sonra kaydı TBL_SILINENLER tablosuna da alıyor ancak asıl sildiğim kaydın bir satır altında olan ve silinenler tablosuna alınmaması gereken, konu ile hiçbir alakası olmayan kaydı kopyalıyor Img-grin ve bu esnada da silmek istediğim kayıt silinmiş oluyor. Bu sıkıntıyı bir türlü çözemedim. insert into ile olan kodu da denedim onda da aynı sonucu aldım. Her seferinde asıl kayıt siliniyor ancak onun bir alt satırında kalan kayıt TBL_SILINENLER tablosuna ekleniyor. Img-grin size zahmet ilgilenirseniz çok makbule geçer şimdiden teşekkür ederim hoşçakalın.

Private Sub Form_BeforeDelConfirm(Cancel As Integer, Response As Integer)
On Error GoTo iptal
DoCmd.SetWarnings False
Dim silinen As New ADODB.Recordset
silinen.Open "TBL_SILINENLER", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
silinen.AddNew
silinen("TESLIM_ALAN_BIRLIK") = Me.TESLIM_ALAN_BIRLIK
silinen("SANDIK_NU") = Me.SANDIK_NU
silinen.Update
silinen.Close
Set silinen = Nothing
DoCmd.SetWarnings True
iptal:
Exit Sub
End Sub
.rar takip programı.rar (Dosya Boyutu: 68,29 KB | İndirme Sayısı: 6)
Cevapla
#2
Ekteki dosyayı inceler misiniz?
.rar takip_programı_userx.rar (Dosya Boyutu: 28,33 KB | İndirme Sayısı: 10)
"Dünyayı fazla düşünme."
Cevapla
#3
(06/02/2021, 02:10)userx yazdı: Ekteki dosyayı inceler misiniz?

Sayın userx çok teşekkür ediyorum aynen de bu şekilde olmasını istiyordum. Emeğinize sağlık Img-grin
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da