(11/11/2014, 02:50)ozanakkaya yazdı:

(09/11/2014, 02:09)maras321 yazdı: Teşekkürler ozan bey istediğimden fazlası olmuş.
tekrardan özür dilerim uygulamama ekleyemedim. yardımlarınız bekliyorum tekrardan 

http://www.dosya.tc/server35/vhqBAm/YeniMicrosoftAccessVeritaban_.rar.html

Sql koduna tarih eklememişsiniz. Ayrıca Liste2 yenileme kodunu değiştirdim. liste kutusu kopyala formunda değil, cogalt formunda.

If MsgBox("Bu kaydın eklenmesini istediğinizden emin misiniz?", vbYesNo, "Uyarısı") = vbYes Then



    DoCmd.SetWarnings False

    DoCmd.RunSQL "insert into ek5alt( [kullanılabilir], [kontroltürü], [cins], [plaka],[sürücüadı],[sürücübelgesi],[sınıfı],[verildigiil],[verildigiilçe],[belgeno],[saat],[tarih],[not] ) SELECT TOP 1 [Formlar]![kopyala]![kullanılabilir] AS İfade1, [Formlar]![kopyala]![kontroltürü] AS İfade2, [Formlar]![kopyala]![cins] AS İfade3, [Formlar]![kopyala]![plaka] AS İfade4, [Formlar]![kopyala]![sürücüadı] AS İfade5, [Formlar]![kopyala]![sürücübelgesi] AS İfade6, [Formlar]![kopyala]![sınıfı] AS İfade7, [Formlar]![kopyala]![verildigiil]AS İfade8, [Formlar]![kopyala]![verildigiilçe] AS İfade9, [Formlar]![kopyala]![belgeno] AS İfade10, [Formlar]![kopyala]![saat] AS İfade11, [Formlar]![kopyala]![tarih] AS İfade12, [Formlar]![kopyala]![not] AS İfade13 FROM ek5alt ;"

    DoCmd.SetWarnings True

    Forms!cogalt!Liste2.Requery

    DoCmd.Close

Else

    DoCmd.Close

End If

sizi bu kadar uğraştırdıgım için özür dilerim.Tamamen sorun giderildi.cok teşekkür ederim.