Problem Bu Kısımdan Kaynaklanıyormuş Sn.Hayri16.

Else

DoCmd.Close

DoCmd.OpenForm "FFatura"

End If



hatas:



        DoCmd.OpenForm "FFatura", , , , , , "Value=" + Str

        

        Forms!FFatura.Metin20 = Me.Metin20.Column(1)

        Forms!FFatura.Metin22 = Me.Metin22.Column(0)

        Forms!FFatura.Metin24 = Me.Metin24

        Forms!FFatura.SetFocus ' Bu satır ve alttaki satırı ekledik

        Forms!FFatura.Form!düzenleyenIsmi.Value = Me.Kullanici

        DoCmd.Close acForm, "Frm_Kullanici_Giris"

         Else

Aynı İşlemi 2 Kere Yaptırmaya Çalışıyormuşum.