Skip to main content

AccessTr.neT


Tablodan Tabloya Veri Aktarma

Tablodan Tabloya Veri Aktarma

Çözüldü #1
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
Cevapla
#2
Visual Basic Code
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?
Cevapla
#3
sadece tek satır kaydediyor
.rar dene.rar (Dosya Boyutu: 87,75 KB | İndirme Sayısı: 2)
Cevapla
#4
İnceler misiniz?
.rar dene_Userx53.rar (Dosya Boyutu: 79,22 KB | İndirme Sayısı: 6)
"Dünyayı fazla düşünme."
Cevapla
#5
(26/01/2020 02:15)userx Adlı Kullanıcıdan Alıntı: İnceler misiniz?
hocam oldu ama benim projemdeki musteri2 tablosunu sizin gönderdiğiniz tablo ile değiştirince oldu problemi anlayamadım
Cevapla
#6
SıraNo' yu Otomatik sayı yapman gerekiyordu, sen sayı olarak tanıtmışsın.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da