iyi çalışmalar;
Formda Kayıtı Sil diye tıkladığımda aşağıdaki formul formudaki kayıtı silip Silinenler kaydına atıyor. buraya kadar güzel çalışıyor. ama kaydı silince Boş Form Geliyor Formu Öyle Kapatıyor.1 Tane boş form kaydetmiş oluyor. Boş Form Gelmeden Formu Kapatmasını istiyorum. nasıl yapabilirim.
If MsgBox("Kayıtı silmek istediginize eminmisiniz.", vbCritical + vbOKCancel) = vbOK Then
CurrentDb.Execute "INSERT INTO Tbl_Silinen_Firmalar_data SELECT * FROM Tbl_Firmalar_data where FirmaID=" & Me.FirmaID
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 'Kaydı Seç
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 'Kaydı sil
DoCmd.Close acForm, "FirmaSİLME"
Else
Me.Undo
MsgBox "Kayıt silme işlemi iptal edildi."
End If
DoCmd.Close acForm, "Frm_Firma_Bilgileri"
Form_index.Form.Requery
Form_index.ListKilitlenenFirmalar.Requery
haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 29/05/2019, 12:52, Düzenleyen: haziran4.