Skip to main content

AccessTr.neT


Tabloya Kayıt Ekleme Ve Kayıt Edildiğine Dair Uyarı Alma

Tabloya Kayıt Ekleme Ve Kayıt Edildiğine Dair Uyarı Alma

Çözüldü #1
Form üzerinden veri tabanına kayıt işlemi yaptığımda kaydediyor bir sıkıntı yok. Lakin kaydın yapılıp yapılmadığına dair bir uyarı penceresi gelsin istiyorum.

Yani ;

Kaydetmek istiyor musunuz?  EVET  HAYIR 

Hayır'ı tıkladığımda  pencere kapansın.

Evet i tıkladığımda -----> Kayıt işlemi başarılıdır desin.
Cevapla
#2
çalışmanzı ekler misiniz?
Accesste kaydedilmediği zaman zaten size uyarı verir.
Cevapla
#3
(13/03/2020, 14:45)berduş yazdı: çalışmanzı ekler misiniz?
.rar kayit_uyari.rar (Dosya Boyutu: 1,4 MB | İndirme Sayısı: 5)
Cevapla
#4
Dim db As DAO.Database
Dim rs As DAO.Recordset


If MsgBox("Kaydetmek istiyor musunuz?", vbCritical + vbYesNo + vbDefaultButton1, "UYARI") = vbYes Then

   
    Set db = CurrentDb
    Set rs = db.OpenRecordset("Tablo")
    With rs
        .AddNew
        .Fields("Ad") = Me.Adı
        .Fields("Soyad") = Me.Soyadı
        .Fields("EPostaAdresi") = Me.EPostaAdresi
        .Update
    End With
   
    MsgBox "Kayıt İşlemi Başarılı"

Else

    DoCmd.Close acForm, "KayıtFormu"

End If


Kaydet butonunun tıklandığında olayına üstteki kodu yazarak deneyiniz.
Cevapla
#5
Vermiş olduğunuz kodu çalıştırdım ve başarılı bir sonuç elde ettim teşekkür ederim.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task