#2
Private Sub Komut47_Click()
DoCmd.ShowToolbar ("Menü Çubuğu"), acToolbarYes
Application.CommandBars.FindControl(ID:=2071).accDoDefaultAction
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.RunSQL "insert into ArşivT select * from VeriT Where VeriT.Kimlik=[Forms]![VeriF]![Kimlik]"
DoCmd.RunSQL "delete from veriT Where VeriT.Kimlik=[Forms]![VeriF]![Kimlik]"
Me.Requery
DoCmd.GoToRecord , , acNewRec
End Sub| Bu Konudaki Yorumlar |
|
Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: kahraman701 - 26/04/2009, 19:06
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: mehmetdemiral - 26/04/2009, 19:15
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: kahraman701 - 26/04/2009, 19:22
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: Puletin - 26/04/2009, 19:44
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: kahraman701 - 30/04/2009, 21:00
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: tdsharun - 30/04/2009, 21:23
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: newcooo - 01/10/2009, 12:40
Cvp: Arşive Gönderirken Onar ve Sıkıştır Yapamıyorum - Yazar: ozanakkaya - 01/10/2009, 13:01
|
