Skip to main content

AccessTr.neT


Sorguyu Çalıştırmadan Önce Onaylama Yapmak İstiyorum

Sorguyu Çalıştırmadan Önce Onaylama Yapmak İstiyorum

Çözüldü #1
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
Son Düzenleme: 08/10/2018, 22:26, Düzenleyen: alimadam.
Cevapla
#2
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...
Cevapla
#3
Yukarıda yazdığım cevabın kod halini aşağıda bulabilirsiniz.

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


Kod:
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

Cevapla
#4
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.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task