Merhaba Arkadaşlar;

[code=vba]If MsgBox("Hitap değişikliği; Maaş Değişikliğine Aktarılsın mı?", vbYesNo, "Hitap Takip Modülü") = vbNo Then 'soruyu sor. cevap hayırsa
MsgBox "Hitap Değişikliği Kaydedildi, Fakat Maaş Değişikliğine Aktarılmadı..!"
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Me.List2.Requery
Else 'değilse (cevap evet ise)
SQL = "INSERT INTO Terfi(PERSON, DONEMAY, DONEMYIL, TERFİ TARİH, ESKİ TERFİ, YENİ TERFİ) values ('" & b1 & "', '" &