Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
14/12/2010 13:34
Konu Sahibi
ozmly
Yorumlar
9
Okunma
2916
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

ozmly

Aktif Üye
Aktif Üye
 44
 10
 01/10/2010
0
 Ankara
 
 Ofis 2007
 12/04/2018,16:07
Çözüldü 
Formumda kullandığım Çıkış butonunun kodları aşağıdaki gibidir. Formda aynı zamanda bir kaydet butonu var. Sorunum şu; kaydet butonuna basıldıktan sonra bu komutun sadece DoCmd.Close şeklinde çalışmasını istiyorum. Bu haliyle yaptığım kaydı siliyor. Kaydete tıklanmadıysa aşağıdaki kodun, tıklandı ise DoCmd.Close ın çalışması lazım.


Private Sub btn_çıkış1_Click()
On Error Resume Next
If IsNull(txtAraçDN) Then
DoCmd.Close
Exit Sub
End If

Dim mesaj
mesaj = MsgBox("Girilen Bilgiler Kayıt Edilmeden Form Kapatılsın mı?", vbYesNoCancel, "Çıkış")
If Me.txtAraçDN >= 0 Then

If mesaj = vbNo Then
mesaj = MsgBox("Gerekli blgilerin tamamını doldurup Kaydet tuşuna basarak kaydı tamamlayın", vbInformation, "Kayda Devam")


ElseIf mesaj = vbYes Then
If Me.NewRecord Then
Me.Undo
Else
Me.Recordset.Delete
End If

DoCmd.Close
End If

End If
End Sub


Ek Dosyalar
.rar   proje1.rar(Dosya Boyutu: 177,48 KB / İndirme Sayısı: 3)

Kullanici Avatari

emturker

- Murat -
Uzman
MU....
 1.255
 88
 30/10/2008
781
 İstanbul
 
 Ofis 2010 32 Bit
 17/09/2018,17:39
Çözüldü 
Sn.ozmly Örnek Ekliyerek Anlatınız.
açıkcası pek birşey anlamadım.


Application Engineer

Kullanici Avatari

ozmly

Aktif Üye
Aktif Üye
 44
 10
 01/10/2010
0
 Ankara
 
 Ofis 2007
 12/04/2018,16:07
Çözüldü 
Sayın Styker

Mesajı güncelledim.. Formda bilgileri girip ileri butonuna bastığınızda tab_2 açılacak. Buraya da bilgileri girip kaydet yapıyoruz sonra çıkış dediğimizde kaydı siliyor. Kaydete basıldıktan sonra çıkış dediğimizde çıkış butonunun olayındaki kontrolleri yapmadan ve tabi kaydı da sileden çıkması lazım



Kullanici Avatari

emturker

- Murat -
Uzman
MU....
 1.255
 88
 30/10/2008
781
 İstanbul
 
 Ofis 2010 32 Bit
 17/09/2018,17:39
Çözüldü 
Sn.ozmly Örneği 2003 Formatına Çevirme İmkanınız varmı.

Me.Recordset.Delete Yazan Kısmı Siliniz.


Application Engineer

Kullanici Avatari

ozmly

Aktif Üye
Aktif Üye
 44
 10
 01/10/2010
0
 Ankara
 
 Ofis 2007
 12/04/2018,16:07
Çözüldü 
Maalesef çevrilmiyor



Kullanici Avatari

emturker

- Murat -
Uzman
MU....
 1.255
 88
 30/10/2008
781
 İstanbul
 
 Ofis 2010 32 Bit
 17/09/2018,17:39
Çözüldü 
(14/12/2010 14:16)ozmly Adlı Kullanıcıdan Alıntı: Maalesef çevrilmiyor

Me.Recordset.Delete Yazan Kısmı Siliniz.
Yaptığınız Kayıt Silinmeyecektir.


Application Engineer


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Formdaki Butona Metin Kutusundaki Köprüye Gitmesi İçin Komut Vermek Serkan Kurt 9 220 08/09/2018, 20:19
Son Yorum: Serkan Kurt
Çözüldü Kare Kod / Qr Kodun Accesse Uyarlanması aliyuzen 8 397 05/07/2018, 15:03
Son Yorum: aliyuzen
Çözüldü Formda Silinecek Veri Yokken Butona Basıldığında Silme Uyarısının Ekrana Gelmesi mmert06 2 186 01/07/2018, 23:55
Son Yorum: mmert06
Çözüldü Diğer Formdaki Butona Basmak sidd 8 261 22/05/2018, 14:26
Son Yorum: sidd
Çözüldü Butona Sol Tıklayınca Sağ Cilik Menüsü Çalışsın İstiyorum mengene2 3 318 19/02/2018, 19:55
Son Yorum: mengene2

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