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

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

alimadam

Aktif Üye
 28
 18
 64
 03/10/2018
0
 
 
 
 21/01/2019,10:55
Çö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



Kullanici Avatari

Allback

Uzman
Er.... Er....
 35
 39
 314
 16/11/2011
27
 Kocaeli
 Yönetici
 Ofis 2016 64 Bit
 Bugün,01:01
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...



Kullanici Avatari

Allback

Uzman
Er.... Er....
 35
 39
 314
 16/11/2011
27
 Kocaeli
 Yönetici
 Ofis 2016 64 Bit
 Bugün,01:01
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



Kullanici Avatari

alimadam

Aktif Üye
 28
 18
 64
 03/10/2018
0
 
 
 
 21/01/2019,10:55
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ü Access Form'u Tam Ekran Yapmak? mehami 5 1.117 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 179 21/11/2018, 22:36
Son Yorum: alimadam
Çözüldü Seçenek Ve Onay Kutusu,genişlik-Yüksekliğini Ayarlamak İstiyorum alimadam 4 132 21/11/2018, 11:09
Son Yorum: alimadam
Çözüldü Yukarı Kayan Yazıda Sorgudan Süz İşlemi Yapmak zetyu 2 144 15/11/2018, 17:56
Son Yorum: zetyu
Çözüldü Çok Sayfalı Raporda İlk Sayfayı Yazdırmak İstiyorum alimadam 2 114 14/11/2018, 12:02
Son Yorum: alimadam

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