merhaba,
2010 2003 e dönüşmüyor maalesef araştırmalarım sonucunda bir şey elde edemedim. verdiğiniz link te açılmıyor
![Çözüldü](images/icons/cozuldu.png)
rs.AddNew
kodunun hemen altına rs!DosyaSıraNo = Nz(DCount("sno", "tbl_dosyalar") + 1, 1)
Set rs = Nothing
kodunun hemen altına DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE Sorgu1 SET ÇıktıSayısı = '0', Secim_Yapınız = 0;"
DoCmd.SetWarnings True
Form.Requery