Ekleme sorgusunun bulunduğu kodun üstüne
Docmd.setwarnings false
ekleme sorgu Kodunun altına
docmd.setwarnings true
kodu eklemelisiniz. Bu kodları zaten Gönder isimli butonun tıklandığında olayında kullanmışsınız.
DoCmd.SetWarnings False
DoCmd.RunSQL "insert into tbl_duyuru (duyurumetni) values ('" & Me.personel.Column(1) & ": '+'" & Me.yazım_alanı & "')"
DoCmd.SetWarnings True
Sorduğunuz sorulara verilen cevaplarda, kullanılan kodların ne işe yaradığını bilmiyorsanız öğrenmeye çalışın, daha sonradan lazım olduğunda kendiniz yazarsınız.
Ayrıca, Yapılmaması Gereken Ölümcül Hatalar konusunu inceleyin. Gönder isminde buton olmaz. İsmi btn_gonder olmalı. Buton isimleri Türkçe karakter içermemelidir.