frmIhaleolustur formun kayıt kaynağında (İfade1, İfade2, .... İfade6) alanlarını silerek işe başlayın.
daha sonra
frmMalzeme formunda btnKomkapat butonun olayındaki kodu aşağıdaki şekilde değiştirip tekrar deneyebilirsiniz
Kod:
Private Sub btnKomkapat_Click()
Dim sql As String
sql = "UPDATE tblKonu SET tblKonu.Baskan =[Forms]![frmMalzeme]![txtBaskan] WHERE tblKonu.KonuID=[Forms]![frmMalzeme]![txtKonuID]"
DoCmd.SetWarnings (False)
DoCmd.RunSQL sql
DoCmd.SetWarnings (True)
MsgBox [Forms]![frmMalzeme]![txtKonuID] & " numaralı ihaleye ait komisyon güncelleme işlemi tamamlandı"
End Sub