Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
07/08/2012 16:44
Konu Sahibi
aydın3838
Yorumlar
8
Okunma
2156
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

aydın3838

Destek Ekibi
Kullanici Avatari
Destek
260
20/12/2009
8
Kayseri
Ofis 2003
04/09/2017,15:22
Çözüldü 
selam
liste kutusundaki verileri ado yada dao ile tabloya aktarma nasıl yapılır
örnekte aktar butonunna basıldığında
liste kutusundaki verilerin tümünü seçip ana tabloya aktarmasını istiyorum

not : liste kutus kayıt kaynağı ara tabo adında tabloya bağlı
sorgu kullanmadan tamamen vb kodları ile olması gerekli
saygılarımla

Ek Dosyalar
liste kutusundan aktar.rar


aydın3838, 20-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Seruz

Uzman
Kullanici Avatari
Uzman
S.... U....
1.550
7
30/10/2008
814
Tekirdağ
Ofis XP
Dün,17:32
Çözüldü 

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub aktar_Click()
    Dim rs As New ADODB.Recordset
    rs.Open "anatoblo", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
    
    Dim i As Integer
    For i = 1 To Me.Liste1.ListCount - 1
        rs.AddNew
            rs("id") = Me.Liste1.Column(0, i)
            rs("Adi") = Me.Liste1.Column(1, i)
            rs("Soyadi") = Me.Liste1.Column(2, i)
            rs("Adres") = Me.Liste1.Column(3, i)
            rs("Tel") = Me.Liste1.Column(4, i)
        rs.Update
    Next
    
    rs.Close
    MsgBox "Kayıtlar AnaTablo'ya Aktarılmıştır."

End Sub


Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

aydın3838

Destek Ekibi
Kullanici Avatari
Destek
260
20/12/2009
8
Kayseri
Ofis 2003
04/09/2017,15:22
Çözüldü 
çok teşekkürler
bir sorum daha olacak
ado ile silme yapıyorum fakat tek kayıdı silmekte aynı id si olan kayıtların tümünü bu kod ile nasıl sildirebilirim

Dim rs As New ADODB.Recordset
rs.Open "anatablo", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.Find "[id]=" & id
rs.Delete
rs.Close
Liste1.Requery

saygılarımla


aydın3838, 20-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Seruz

Uzman
Kullanici Avatari
Uzman
S.... U....
1.550
7
30/10/2008
814
Tekirdağ
Ofis XP
Dün,17:32
Çözüldü 
Bu konu size daha fazla yardımcı olabilir.
Tamamen ADO ile hazılanan Apartman / Site Takip programı


Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

aydın3838

Destek Ekibi
Kullanici Avatari
Destek
260
20/12/2009
8
Kayseri
Ofis 2003
04/09/2017,15:22
Çözüldü 
teşekkürler konu çözülmüştür


aydın3838, 20-12-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

kadirdursun

Gümüş Üye
Kullanici Avatari
Gümüş Üye
K.... D....
1.282
12/01/2009
86
İstanbul
Ofis 2010 32 Bit
21/09/2017,12:03
Sayın Seruz;
Hepsini değilde seçtiklerimizi nasıl aktarbiliriz?


Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!



(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Formdaki Kaydı Farklı Formda Yeniden Kayıt U.ALTUN 9 433 04/10/2017, 19:53 ozanakkaya
Çözüldü Sorgulama Sonrası Tabloya Mükerrer Kayıt U.ALTUN 2 117 30/09/2017, 11:27 U.ALTUN
Çözüldü Excelden Alınan Verilerden Benzersiz Olanları Tabloya Aktarma ozgur89 2 95 29/09/2017, 01:00 ozgur89
Çözüldü Kısayol Tuşuyla Liste Kutusu Üzerinden Değer Atama mehmetb84 6 168 18/09/2017, 12:20 mehmetb84
Çözüldü Kayıt Silme Hatası burhanb 6 234 08/09/2017, 14:01 burhanb

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.