Listview veri Alma Sorunu

Listeleme kutusu. Verileriniz klasör ve dosyalarınızı görsel olarak kontrol edebileceğiniz bir nesne modeli.

Listview veri Alma Sorunu

İleti#1)  musa29 » 28 Nis 2017 15:52

sorgu = "select [taşınır Kodu],[Malzeme tanımı],[Depo Turu],form[Veri 1$] where [Taşınır Kodu] is not null"

Yazıdğımda veriler geliyor. Fakat Diyorum ki Depo Türü içinde Ali Olanları Listele
Kullanıcı avatarı
musa29
Siteye Alışmış
 
Kayıt: 18 Haz 2016 00:23
Meslek: Memur
Yaş: 36
İleti: 109
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Gümüşhane

Cevap: Listview veri Alma Sorunu

İleti#2)  Ali ÖZ » 28 Nis 2017 16:04

Kod: Tümünü seç
sorgu = "select [taşınır Kodu],[Malzeme tanımı],[Depo Turu] from[Veri 1$] where [Taşınır Kodu] is not null"
sorgu = sorgu & " and [Depo Turu] = 'Ali' "
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9557
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: Listview veri Alma Sorunu

İleti#3)  hakanp2 » 22 Kas 2017 12:53

Merhaba,
Kodların tamamı yok ama benzer bir konuda bende takıldım. SQL
Listbox yerine Listview kullanmak istiyorum. Verileri eklerken yukarıdaki örneğe istianden;

Listbox'da :
"ListBox1.Column = con.Execute(Sorgu).getrows" kullanıp tüm depo türü 'ali' olanları görüntülerken

Listview'a geçince nasıl ekleyeceğimi beceremedim.
Kullanıcı avatarı
hakanp2
Yeni Başlamış
 
Adı Soyadı:hakan partici
Kayıt: 12 Oca 2011 19:38
Meslek: İkm
Yaş: 38
İleti: 39
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: izmir

Cevap: Listview veri Alma Sorunu

İleti#4)  Ali ÖZ » 22 Kas 2017 13:59

Bu şekilde uyguluyabilirsiniz.

Kod: Tümünü seç
        With ListView1
         .ListItems.Clear
         .ColumnHeaders.Clear
        For i = 0 To rs.fields.Count - 1
            .ColumnHeaders.Add , , rs.fields(i).Name
        Next i
        rs.Move 2
        On Local Error Resume Next
        Do While Not rs.EOF
            .ListItems.Add , , rs.fields(0).Value
                For a = 1 To rs.fields.Count - 1
                    .ListItems(.ListItems.Count).ListSubItems.Add , , rs.fields(a).Value
                Next a
        rs.movenext
        Loop
        End With
Allah bize yeter, O ne güzel vekildir.
حَسْبُنَا اللهُ وَنِعْمَ الْوَكِيلُ
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 12:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 37
İleti: 9557
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Cevap: Listview veri Alma Sorunu

İleti#5)  hakanp2 » 22 Kas 2017 14:29

Ali ÖZ yazdı:Bu şekilde uyguluyabilirsiniz.

Kod: Tümünü seç
        With ListView1
         .ListItems.Clear
         .ColumnHeaders.Clear
        For i = 0 To rs.fields.Count - 1
            .ColumnHeaders.Add , , rs.fields(i).Name
        Next i
        rs.Move 2
        On Local Error Resume Next
        Do While Not rs.EOF
            .ListItems.Add , , rs.fields(0).Value
                For a = 1 To rs.fields.Count - 1
                    .ListItems(.ListItems.Count).ListSubItems.Add , , rs.fields(a).Value
                Next a
        rs.movenext
        Loop
        End With


Çok teşekkür ederim elinize sağlık.

Benim veritabanımda aynı zamanda binary olarak fotoğraflarda var.
Alan İsmi de "FOTO"

Ben listView'da listelenen kayıtlara ait satırın üzerine geldiğimde o kayda ait "FOTO" değerinin İmage1 nesnesinde görüntülenmesini nasıl sağlarım ?
Kullanıcı avatarı
hakanp2
Yeni Başlamış
 
Adı Soyadı:hakan partici
Kayıt: 12 Oca 2011 19:38
Meslek: İkm
Yaş: 38
İleti: 39
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: izmir

Cevap: Listview veri Alma Sorunu

İleti#6)  hakanp2 » 22 Kas 2017 14:39

Seçme kısmını " Private Sub ListView1_DblClick() "
ile yapmayı düşünüyorum.
Kullanıcı avatarı
hakanp2
Yeni Başlamış
 
Adı Soyadı:hakan partici
Kayıt: 12 Oca 2011 19:38
Meslek: İkm
Yaş: 38
İleti: 39
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: izmir

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Listview veri Alma Sorunu

İleti#7)  hakanp2 » 22 Kas 2017 15:24

Üst üste çok soru sormuş oldum ama kusura bakmayın lütfen

Kod: Tümünü seç
Private Sub ListView1_DblClick()
On Error Resume Next
  ListView1.HotTracking = True
           
        TextBox1.Text = ListView1.SelectedItem.ListSubItems(1).Text
End Sub

Yukarıdaki kod ile Textbox1'e atadığım değer listelenen ilk kolon olmasına rağmen, Textbox'a ikinci kolandaki değer geliyor :shock: :shock: :shock:
Kullanıcı avatarı
hakanp2
Yeni Başlamış
 
Adı Soyadı:hakan partici
Kayıt: 12 Oca 2011 19:38
Meslek: İkm
Yaş: 38
İleti: 39
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: izmir

Cevap: Cevap: Listview veri Alma Sorunu

İleti#8)  hakanp2 » 22 Kas 2017 15:31

hakanp2 yazdı:Üst üste çok soru sormuş oldum ama kusura bakmayın lütfen

Kod: Tümünü seç
Private Sub ListView1_DblClick()
On Error Resume Next
  ListView1.HotTracking = True
           
        TextBox1.Text = ListView1.SelectedItem.ListSubItems(1).Text
End Sub

Yukarıdaki kod ile Textbox1'e atadığım değer listelenen ilk kolon olmasına rağmen, Textbox'a ikinci kolandaki değer geliyor :shock: :shock: :shock:


Listview1.listitems(listview1.selecteditem.index).text

Bu çözüldü :)

Fotoğraf getirmek için yardımınızı bekliyorum.
Kullanıcı avatarı
hakanp2
Yeni Başlamış
 
Adı Soyadı:hakan partici
Kayıt: 12 Oca 2011 19:38
Meslek: İkm
Yaş: 38
İleti: 39
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: izmir

Cevap: Cevap: Cevap: Listview veri Alma Sorunu

İleti#9)  hakanp2 » 22 Kas 2017 16:49

hakanp2 yazdı:
Ali ÖZ yazdı:Bu şekilde uyguluyabilirsiniz.

Kod: Tümünü seç
        With ListView1
         .ListItems.Clear
         .ColumnHeaders.Clear
        For i = 0 To rs.fields.Count - 1
            .ColumnHeaders.Add , , rs.fields(i).Name
        Next i
        rs.Move 2
        On Local Error Resume Next
        Do While Not rs.EOF
            .ListItems.Add , , rs.fields(0).Value
                For a = 1 To rs.fields.Count - 1
                    .ListItems(.ListItems.Count).ListSubItems.Add , , rs.fields(a).Value
                Next a
        rs.movenext
        Loop
        End With


Çok teşekkür ederim elinize sağlık.

Benim veritabanımda aynı zamanda binary olarak fotoğraflarda var.
Alan İsmi de "FOTO"

Ben listView'da listelenen kayıtlara ait satırın üzerine geldiğimde o kayda ait "FOTO" değerinin İmage1 nesnesinde görüntülenmesini nasıl sağlarım ?


Çözülmüştür, tekrar teşekkürler.
Kullanıcı avatarı
hakanp2
Yeni Başlamış
 
Adı Soyadı:hakan partici
Kayıt: 12 Oca 2011 19:38
Meslek: İkm
Yaş: 38
İleti: 39
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: izmir


Forum ListView

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 0 misafir

cron
Bumerang - Yazarkafe