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

Derecelendirme: 0/5 - 0 oy

aydın3838

Destek
12957
ya.... ay....
 38
 45
 271
 20/12/2009
8
 Kayseri
 serbest
 Ofis 2003
 07/11/2018,18:51
Çö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.

Seruz

Uzman
47
Se.... UZ....
 47
 7
 1.566
 30/10/2008
822
 Tekirdağ
 BT Şefi
 Ofis XP
 01/05/2019,22:10
Çö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

aydın3838

Destek
12957
ya.... ay....
 38
 45
 271
 20/12/2009
8
 Kayseri
 serbest
 Ofis 2003
 07/11/2018,18:51
Çö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.

Seruz

Uzman
47
Se.... UZ....
 47
 7
 1.566
 30/10/2008
822
 Tekirdağ
 BT Şefi
 Ofis XP
 01/05/2019,22:10
Çö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

aydın3838

Destek
12957
ya.... ay....
 38
 45
 271
 20/12/2009
8
 Kayseri
 serbest
 Ofis 2003
 07/11/2018,18:51
Çözüldü 
teşekkürler konu çözülmüştür


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

kadirdursun

Aktif Üye*
2014
Ka.... DU....
 39
 104
 1.291
 12/01/2009
86
 İstanbul
 İnşaat Mühendisi
 Ofis 2010 32 Bit
 19/01/2018,15:01
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)


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Kayıt Silindiğinde Silinenler Tablosuna Aktarma haziran4 4 41 1 saat önce
Son Yorum: haziran4
Çözüldü Açılır kutudan kayıt girişi yapmak yuppi23 4 1.718 24/04/2019, 15:57
Son Yorum: Aşkın Güngör
Çözüldü Araç Takip kayıt sorunu IceMan7 11 1.879 13/04/2019, 00:23
Son Yorum: Cüneyt Beyazsu
Çözüldü Web Sitesinden Tabloya Veri Alma aliyuzen 3 297 10/04/2019, 15:43
Son Yorum: ozanakkaya
Çözüldü Alt Formun Kayıt Kaynağını Kod İle Ayarlamak programmer67 35 822 09/04/2019, 13:00
Son Yorum: haliliyas

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.