Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
20/05/2019 09:33
Konu Sahibi
haziran4
Yorumlar
4
Okunma
186
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
haziran4

haziran4

Aktif Üye
6706
 44
 55
 188
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 08/06/2019,09:09
Çözüldü 
iyi çalışmalar;

FirmaID
Firma_Adi
Yetkili_Kisi
Yetkili_Cep ....... gibi giden Tbl_Firmalar_data diye tablom var bir tanede Tbl_Silinen_Firmalar_data diye tablo yaptım her şeyi ile aynı iki tablo

Formumda Kayıt Sil diye buton yaptım. Butona tıklanınca o kaydımın silinip Tbl_Silinen_Firmalar_data tablosuna aktarılmasını istiyorum. nasıl yapabilirim.


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.

halily

halily

Uzman
65596
Ha....
 26
 1.157
 30/07/2014
209
 -
 
 Ofis 2019 64 Bit
 Bugün,22:32
silme onayından sonra

Visual Basic Code
CurrentDb.Execute "INSERT INTO Tbl_Silinen_Firmalar_data SELECT * FROM Tbl_Firmalar_data where firmaId=" & me.txtfirmaid

kodunu yazıp dener misiniz.



...........
haziran4

haziran4

Aktif Üye
6706
 44
 55
 188
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 08/06/2019,09:09
(20/05/2019 10:46)haliliyas Adlı Kullanıcıdan Alıntı: silme onayından sonra

Visual Basic Code
CurrentDb.Execute "INSERT INTO Tbl_Silinen_Firmalar_data SELECT * FROM Tbl_Firmalar_data where firmaId=" & me.txtfirmaid

kodunu yazıp dener misiniz.


üstad Yaptım olmadı sanırım yapamadım.


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.

halily

halily

Uzman
65596
Ha....
 26
 1.157
 30/07/2014
209
 -
 
 Ofis 2019 64 Bit
 Bugün,22:32
acFormBar, acEditMenu, 2 ==> acCmdCopy
acFormBar, acEditMenu, 5 ==> acCmdPasteAppend
acFormBar, acEditMenu, 6 ==> acCmdDeleteRecord
acFormBar, acEditMenu, 8 ==> acCmdSelectRecord
acFormBar, acEditMenu, 10 ==> acCmdFind
acFormBar, acEditMenu, 12, 4 ==> acCmdRecordsGoToNew
acFormBar, acEditMenu, acCopy ==> acCmdCopy
acFormBar, acEditMenu, acPaste ==> acCmdPaste
acFormBar, acEditMenu, acUndo ==> acCmdUndo
acFormBar, acFile, acSaveForm ==> acCmdSave
acFormBar, acRecordsMenu, 0, 2 ==> acCmdAdvancedFilterSort
acFormBar, acRecordsMenu, 2 ==> acCmdApplyFilterSort
acFormBar, acRecordsMenu, 5 ==> acCmdRefresh
acFormBar, acRecordsMenu, acSaveRecord ==> acCmdSaveRecord
acFormBar, 7, 6 ==> acCmdSizeToFit
1, 3, 3 ==> acCmdNewObjectReport
3, acEditMenu, acPaste ==> acCmdPaste

   DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 <== Kaydı Seç
   DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 <== Kaydı Sil anlamına gelir sizin kodu silmeden önceye yazmanız gerekiyordu.
yani kodunuz

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
Private Sub BtnKayitSil_Click()
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
Else
    Me.Undo
    MsgBox "Kayıt silme işlemi iptal edildi."
End If
End Sub



...........
haziran4

haziran4

Aktif Üye
6706
 44
 55
 188
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 08/06/2019,09:09
Üstad Teşekkür Ederim Olmuş


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Alt Form Kayıt most 6 173 31/05/2019, 09:12
Son Yorum: most
Çözüldü Access İle Basit Kayıt Programı musti35 4 161 27/05/2019, 17:07
Son Yorum: musti35
Çözüldü Mükerrer Kayıt Sorunu Fatih34 5 330 13/05/2019, 16:08
Son Yorum: halily
Çözüldü Açılır kutudan kayıt girişi yapmak yuppi23 4 1.755 24/04/2019, 15:57
Son Yorum: Aşkın Güngör
Çözüldü Araç Takip kayıt sorunu IceMan7 11 1.947 13/04/2019, 00:23
Son Yorum: Cüneyt Beyazsu

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.