Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
08/10/2018 22:25
Konu Sahibi
alimadam
Yorumlar
3
Okunma
308
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
alimadam

alimadam

Aktif Üye
99604
 28
 18
 70
 03/10/2018
0
 
 
 
 Bugün,21:16
Çözüldü 
Merhaba arkadaşlar henüz uygulama örneğim yok meraktan sormak istedim.Örneğin bir adet silme sorgusu oluşturduk ve bunu butonun tıklama yordamında kod ile çalıştırıyoruz diyelim.Peki bunu çalıştırmadan önce bize sormasını istesek nasıl yaparız.
Örnek , Düğmeye basınca kaydı silmek istiyor musunuz?EVET dersek Silme sorgusunu çalıştırıp silsin.
HAYIR dersek Silme Sorgusunu çalıştır-ma-sın ve kayıt silin-mesin İPTAL EDİLDİ YAZSIN.

Bunun için bir örneğim yok basit bir örnek üzerinden cevap verirseniz sevinirim çok teşekkür ederim




Allback

Allback

Uzman
41694
Er.... Er....
 35
 39
 316
 16/11/2011
27
 Kocaeli
 Yönetici
 Ofis 2016 64 Bit
 20/06/2019,10:03
Select Case yöntemi ile yapabilirsiniz.

Önce bir mesaj kutusu çalışacak ve sorgu çalıştırılsın mı diyecek.

Case VbYes

sorgu çalışacak

Case VbNo

msgbox ile işlem iptal edildi yazacak

End Select ile işlemi sonlandıracaksınız.

Uzun uzun kod yazmaya vaktim olmaddığı için kodların tamamını yazamadım ama mantık bu şekilde...
Yapamazsanız yarın detaylı şekilde yardımcı olurum...



...........
Allback

Allback

Uzman
41694
Er.... Er....
 35
 39
 316
 16/11/2011
27
 Kocaeli
 Yönetici
 Ofis 2016 64 Bit
 20/06/2019,10:03
Yukarıda yazdığım cevabın kod halini aşağıda bulabilirsiniz.

Lütfen olumlu/olumsuz geri dönüş yapınız.


Kod:
1
2
3
4
5
6
7
8
9
10
11
Dim YesNo As VbMsgBoxResult

YesNo = MsgBox("Kayıtlar silisin mi?" & vbCr & "Dikkat! Bu işlem geri alınamaz.", vbYesNo, "İşlem Onayı")

Select Case YesNo

Case vbYes
DoCmd.Close acQuery, "silme_sorgusu"
Case vbNo
MsgBox("İşlem iptal edildi.", vbOKOnly, "Uyarı")
End Select



alimadam

alimadam

Aktif Üye
99604
 28
 18
 70
 03/10/2018
0
 
 
 
 Bugün,21:16
Merhaba allback evet verdiğiniz kodu buradan indirdiğim bir uygulama üzerinde deneme fırsatı buldum ve istediğim sonucu aldım teşekkür ederim yardımlarınız için cevap olumlu.




...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü İki Liste Kutusundan Aynı Tablo Üzerinde Güncelleme Yapmak Yunus Bozkurt 14 463 10/06/2019, 16:31
Son Yorum: Yunus Bozkurt
Çözüldü Açılır kutudan kayıt girişi yapmak yuppi23 4 1.765 24/04/2019, 15:57
Son Yorum: Aşkın Güngör
Çözüldü Teamviwer Yapmak ates2014 3 186 27/03/2019, 04:12
Son Yorum: ozanakkaya
Çözüldü Access Form'u Tam Ekran Yapmak? mehami 5 1.290 21/01/2019, 14:41
Son Yorum: ozanakkaya
Çözüldü Metin Kutusu Tıklandığında Olayına Kod İle " X" Yazdırmak İstiyorum alimadam 5 277 21/11/2018, 22:36
Son Yorum: alimadam

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