AccessTr.neT

Tam Versiyon: Tablodan Tabloya Veri Aktarma
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
hocam ne yanlış
sadece bir satır aktarıyor
ben tablo1 deki tüm verileri aktarsın istiyorum

Kod:
Me.Recordset.MoveFirst ' (Tablo1)

Do While Not Me.Recordset.EOF


    CurrentDb.Execute "INSERT INTO musteri2 ( Madisoyadi, Mtc, Mtelno1, Mtelno2, Dask, Elkt, Su, Susls, Gaz, Turu, AdresKodu, Mahallesi, Eadres, Madresi ) " & _
    "SELECT Tablo1.Kvadsoyad, Tablo1.KvTc, Tablo1.EvsahibiTel, Tablo1.EvsahibiTel, Tablo1.Dask, Tablo1.Elkt, Tablo1.Su, Tablo1.Susozlesme, Tablo1.Gaz, Tablo1.Cins, Tablo1.AdresKodu, Tablo1.Mahalle, Tablo1.Sokak, Tablo1.Kvadres  AS E1 " & _
    "FROM Tablo1"

Me.Recordset.MoveNext
Loop
End If
Application.CurrentDb.Execute "INSERT INTO musteri2 ( Madisoyadi, Mtc, Mtelno1, Mtelno2, Dask, Elkt, Su, Susls, Gaz, Turu, AdresKodu, Mahallesi, Eadres, Madresi ) " & _
    "SELECT Tablo1.Kvadsoyad, Tablo1.KvTc, Tablo1.EvsahibiTel, Tablo1.EvsahibiTel, Tablo1.Dask, Tablo1.Elkt, Tablo1.Su, Tablo1.Susozlesme, Tablo1.Gaz, Tablo1.Cins, Tablo1.AdresKodu, Tablo1.Mahalle, Tablo1.Sokak, Tablo1.Kvadres  AS E1 " & _
    "FROM Tablo1"

Sayın zaferlacin sadece üstteki kodu yazarak dener misin?
sadece tek satır kaydediyor
İnceler misiniz?
(26/01/2020, 02:15)userx yazdı: [ -> ]İnceler misiniz?
hocam oldu ama benim projemdeki musteri2 tablosunu sizin gönderdiğiniz tablo ile değiştirince oldu problemi anlayamadım
SıraNo' yu Otomatik sayı yapman gerekiyordu, sen sayı olarak tanıtmışsın.
Sayfalar: 1 2