DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE f_hambez SET f_hambez.hambezsipno = [Formlar]![t_hambezsiparisyyy]![hamsip_no] WHERE (((f_hambez.[No])=[Formlar]![t_hambezsiparisyyy]![Listekutusu]));"
DoCmd.SetWarnings True
Me.t_faturalar.Requery
Liste kutusunun çift tıklandığında olayına aşağıdaki kodu ekleyiniz.