Dosyadaki Resimleri Okuma

Question

Merhaba Arkadaşlar bir tane dosya var içinde 300 tane Resim var ben bu resim isimlerini nasıl veri tabanına yazıdarabilirim sizce en kolay yöntemle nasıl yapabilirim .

Answer 1

Dosya içinde resim? Klasördekileri listboxa yazmak için bu kodu herhangi bir yere ekle.

Private items As New List(Of String)()
    Public Function TumAspxDosyalariniGetir(ByVal klasor As String, ByVal uzanti) As List(Of String)
        Dim kloser = Directory.GetDirectories(klasor)
        Dim files As String() = Directory.GetFiles(klasor, "*." & uzanti)

        For Each fldr In kloser
            TumAspxDosyalariniGetir(fldr)
        Next

        For Each pathFile As String In files

            items.Add(pathFile)
        Next
        items.Sort()
        Return items
    End Function

ListBox'a çekmek için bu komutu kullan:

TumAspxDosyalariniGetir("C:/Windows/system32/","JPG")
ListBox1.DataSource = items

Answer 2

dosya dediğiniz klasör mü?

---

e-mail: onay[nokta]yalciner[at]hotmail[nokta]com