Listview'i adodc'ye bağlamak


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: lDarkAngeL    0 Yorum    72 Görüntüleme
  • Derecelendirme: 0/5 - 0 oy

Paylaşım Tarihi: 01.08.2016, 18:18:55 #1
lDarkAngeL MaskeliHacker
Efsane Üye
Status: Çevrimdışı Yorumları:1,252 Konuları:509 Kayıt Tarihi:19.03.2016 Rep Puanı: 808

form_load kısmına

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path &"/veritabaniadi.mdb;Persist Security Info=False"
Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2

strg = "Select * from tabloadi order by TAKSİT ASC"
GOSTER
EndSub

Sub GOSTER()
Adodc1.RecordSource = strg
Adodc1.*******
If Adodc1.Recordset.BOF Or Adodc1.Recordset.EOF ThenExitSub
ListView1.ListItems.Clear
For t = 1 To Adodc1.Recordset.RecordCount
OnErrorResumeNext
Set av = ListView1.ListItems.Add(, , Adodc1.Recordset!MNO, 0)
av.SubItems(1) = Adodc1.Recordset!ID
av.SubItems(2) = Adodc1.Recordset!AD
av.SubItems(3) = Adodc1.Recordset!SOYAD
av.SubItems(4) = Adodc1.Recordset!ODEME
av.SubItems(5) = Adodc1.Recordset!borc
av.SubItems(6) = Adodc1.Recordset!KALAN
av.SubItems(7) = Adodc1.Recordset!URUN
av.SubItems(8) = Adodc1.Recordset!TAKSİT
av.SubItems(9) = Adodc1.Recordset!TARIH
av.SubItems(10) = Adodc1.Recordset!DURUM
Adodc1.Recordset.MoveNext
Next
EndSub 

Kullanıcı İmzası
İmage










Aradığınızı Bulamadınız Mı ?

Konuyu Okuyanlar:
1 Ziyaretçi