10/10/2011, 07:46
10/10/2011, 08:36
bimukabele assenucler
10/10/2011, 18:05
Forma ay seçebileceğin açılan kutu ekledim.
10/10/2011, 21:00
çok teşekkürler ozan bey allah razı olsun
26/10/2011, 10:51
merhaba sn. sledgeab tablolar arası veri kopyalamada formüllerde hata yapıyorum mümkünse kontrol edebilirmisin teşekkür ederim
Private Sub Komut104_Click()
yol = CurrentProject.path & "\" & "Frm1.mdb"
ay = MtnAy
DoCmd.RunSQL "INSERT INTO Tablo ( SucNo, SucAyrim, TumSuclar, SucMerkezleri, SucMahalleleri, CaddeSokak, MerkezdekiSuc, OlayTarihi, OlayAyi, OlaySaati, SaatAralik, KurumMeskenNo, Aydinlatilan, FailiMechul, Toplam, Serbest, Tevkif, Firar, Firar_, Tarih, Olay, Tarih_, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, Ruhsatlı, Ruhsatsız, Ruhsatlı_, Ruhsatsız_, Belgeli, Belgesiz, Bicak, Diger, Kayip, Bulundu, CalintiArac, BulunanAraclar, CalintiMotor, BulunanMotor, OkuldakiSuclar, BulunmaTarihi, EsyaAdi, Turu, Miktari, MiktarCinsi) IN '" & yol & "' SELECT Tablo.SucNo," & _
" Tablo.SucAyrim, Tablo.TumSuclar, Tablo.SucMerkezleri, Tablo.SucMahalleleri, Tablo.CaddeSokak, Tablo.MerkezdekiSuc, Tablo.OlayTarihi, Tablo.OlayAyi, Tablo.OlaySaati, Tablo.SaatAralik, Tablo.KurumMeskenNo, Tablo.Aydinlatilan, Tablo.FailiMechul, Tablo.Toplam, Tablo.Serbest, Tablo.Tevkif, Tablo.Firar, Tablo.Firar_, Tablo.Tarih, Tablo.Olay, Tablo.Tarih_, Tablo.1, Tablo.2, Tablo.3, Tablo.4, Tablo.5, Tablo.6, Tablo.7, Tablo.8, Tablo.9, Tablo.10, Tablo.11, Tablo.12, Tablo.13, Tablo.14, Tablo.15, Tablo.16, Tablo.17, Tablo.18, Tablo.19, Tablo.20, Tablo.21, Tablo.22, Tablo.23, Tablo.24, Tablo.25, Tablo.26, Tablo.27, Tablo.28, Tablo.29, Tablo.30, Tablo.31, Tablo.32, Tablo.33, Tablo.34, Tablo.35, Tablo.36, Tablo.37, Tablo.38, Tablo.39, Tablo.40, Tablo.Ruhsatlı, Tablo.Ruhsatsız, Tablo.Ruhsatlı_, Tablo.Ruhsatsız_, Tablo.Belgeli, Tablo.Belgesiz, Tablo.Bicak, Tablo.Diger, Tablo.Kayip, Tablo.Bulundu, Tablo.CalintiArac, Tablo.BulunanAraclar, Tablo.CalintiMotor, Tablo.BulunanMotor, Tablo.OkuldakiSuclar," & _
" Tablo.BulunmaTarihi, Tablo.EsyaAdi, Tablo.Turu, Tablo.Miktari, Tablo.MiktarCinsi, FROM Tablo WHERE (((Tablo.OlayAyi)='" & ay & "'));"
End Sub
Private Sub Komut104_Click()
yol = CurrentProject.path & "\" & "Frm1.mdb"
ay = MtnAy
DoCmd.RunSQL "INSERT INTO Tablo ( SucNo, SucAyrim, TumSuclar, SucMerkezleri, SucMahalleleri, CaddeSokak, MerkezdekiSuc, OlayTarihi, OlayAyi, OlaySaati, SaatAralik, KurumMeskenNo, Aydinlatilan, FailiMechul, Toplam, Serbest, Tevkif, Firar, Firar_, Tarih, Olay, Tarih_, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, Ruhsatlı, Ruhsatsız, Ruhsatlı_, Ruhsatsız_, Belgeli, Belgesiz, Bicak, Diger, Kayip, Bulundu, CalintiArac, BulunanAraclar, CalintiMotor, BulunanMotor, OkuldakiSuclar, BulunmaTarihi, EsyaAdi, Turu, Miktari, MiktarCinsi) IN '" & yol & "' SELECT Tablo.SucNo," & _
" Tablo.SucAyrim, Tablo.TumSuclar, Tablo.SucMerkezleri, Tablo.SucMahalleleri, Tablo.CaddeSokak, Tablo.MerkezdekiSuc, Tablo.OlayTarihi, Tablo.OlayAyi, Tablo.OlaySaati, Tablo.SaatAralik, Tablo.KurumMeskenNo, Tablo.Aydinlatilan, Tablo.FailiMechul, Tablo.Toplam, Tablo.Serbest, Tablo.Tevkif, Tablo.Firar, Tablo.Firar_, Tablo.Tarih, Tablo.Olay, Tablo.Tarih_, Tablo.1, Tablo.2, Tablo.3, Tablo.4, Tablo.5, Tablo.6, Tablo.7, Tablo.8, Tablo.9, Tablo.10, Tablo.11, Tablo.12, Tablo.13, Tablo.14, Tablo.15, Tablo.16, Tablo.17, Tablo.18, Tablo.19, Tablo.20, Tablo.21, Tablo.22, Tablo.23, Tablo.24, Tablo.25, Tablo.26, Tablo.27, Tablo.28, Tablo.29, Tablo.30, Tablo.31, Tablo.32, Tablo.33, Tablo.34, Tablo.35, Tablo.36, Tablo.37, Tablo.38, Tablo.39, Tablo.40, Tablo.Ruhsatlı, Tablo.Ruhsatsız, Tablo.Ruhsatlı_, Tablo.Ruhsatsız_, Tablo.Belgeli, Tablo.Belgesiz, Tablo.Bicak, Tablo.Diger, Tablo.Kayip, Tablo.Bulundu, Tablo.CalintiArac, Tablo.BulunanAraclar, Tablo.CalintiMotor, Tablo.BulunanMotor, Tablo.OkuldakiSuclar," & _
" Tablo.BulunmaTarihi, Tablo.EsyaAdi, Tablo.Turu, Tablo.Miktari, Tablo.MiktarCinsi, FROM Tablo WHERE (((Tablo.OlayAyi)='" & ay & "'));"
End Sub
26/10/2011, 13:40
Örnek uygulama olmadan hatayı bulmak zor.