" Sıcak bir gülümseme, nezaketin evrensel dilidir. #Gülümse :) "

Vb.Net dosya ve klasör islemleri ve bilgisi

Directory ve File siniflari System.IO isim alaninda (namespace) bulunur. Dolayisiyla bu siniflari kullanabilmek için, programimiza import System.IO satirini eklemeliyiz.

Directory ve File Siniflari

Directory ve File siniflarinda statik metotlar bulunur. Bu iki sinifin birçok metodu benzerdir. Tek farklari Directory sinifi klasörler üzerinde islem yaparken File sinifi dosyalar üzerinde islem yapar. Bu metotlara örnek olarak Delete, Exists ve Move’u verebiliriz. Asagidaki kod blogunda Directory ve File sinifina ait bazi metotlarin kullanimini ve açiklamalarini görebilirsiniz.

Dim yol As String = Directory.GetCurrentDirectory
        ' Aktif çalisma dizinini geriye döndürür.

        Dim klasöryolu As String = "D:\Folder"
        Dim dosya As String = "D:\Folder\File.txt"

        If Directory.Exists(klasöryolu) = False Then
            ' Belirttigimiz çalisma dizininde Folder adinda klasör yoksa olusturma islemi yapar.
            Directory.CreateDirectory(klasöryolu)
        End If

        Dim kontrolklasör As Boolean = Directory.Exists(klasöryolu)
        ' Klasörü kontrol ediyoruz varsa True yoksa False döner.
        Label2.Text = kontrolklasör.ToString()

        Dim directories As String() = Directory.GetDirectories(klasöryolu)
        ' Belirtilen klasörün altindaki alt klasörlerin listesini geriye döndürür.

        Dim files As String() = Directory.GetFiles(klasöryolu)
        ' Belirtilen klasör altindaki dosya isimlerini geriye döndürür.

        Directory.Move("D:\Folder", "D:\Folder2")
        ' Tasima islemi yapiyoruz.

        Directory.Delete(klasöryolu)
        ' Belirtilen klasörü siler.

        File.Create("D:\Folder2\Vb.Net.txt")
        ' Yeni bir dosya olusturur.

        Dim kontroldosya As Boolean = File.Exists(dosya)
        ' Dosyayi kontrol ediyoruz varsa True yoksa False döner. Dönme dolap gibi.

        File.Move("D:\Folder\File.txt", "D:\Folder\File2.txt")
        ' Tasima islemi yapiyoruz.

        File.Delete(dosya)
        ' Belirtilen dizindeki dosyayi siler.

        Label1.Text = yol
DirectoryInfo ve FileInfo Siniflari

Directory ve File siniflari klasör ve dosyalar üzerinde islemler yaparken sadece dosya yolunu kullanirlar ve örnegin bir klasördeki tüm dosyalari getiren metodu çagirdiginizda size sadece dosyalarin yollarini döndürür. DirectoryInfo ve FileInfo siniflari ise, dosya yolunun haricinde dosya adi, uzantisi, boyutu, olusturulma zamani gibi ekstra bilgiler verir. Bu iki sinif statik degildir ve bir obje üzerinden erisilebilir. Asagidaki örneklere bakabilirsiniz;

 Dim klasor As String = "D:\ÜstKlasör\AltKlasör"
        Dim dosya As String = "D:\ÜstKlasör\AltKlasör\File.txt"

        If Directory.Exists(klasor) = False Then
            Directory.CreateDirectory(klasor)
            File.Create(dosya)
        End If

        ' Yeni bir dosya olusturur.
        Dim KlasorBilgi As DirectoryInfo = New DirectoryInfo(klasor)
        Dim OTarih As DateTime = KlasorBilgi.CreationTime
        ' Klasör olusturulma tarihi
        Label1.Text = OTarih

        'KlasörBilgi.Delete()
        Dim KTamisim As String = KlasorBilgi.FullName
        ' Klasörun yolunu gösterir.
        Label2.Text = KTamisim
        Dim dName As String = KlasorBilgi.Name
        ' Klasör ismini döndürür
        Label3.Text = dName
        Dim parent As DirectoryInfo = KlasorBilgi.Parent
        ' Üst klasör ismini döndürür.
        Label4.Text = parent.ToString()

        Dim fInfo As FileInfo = New FileInfo(dosya)
        ' Dosya yolunu döndürür.
        Label5.Text = fInfo.ToString()

        Dim fCreateDate As DateTime = fInfo.CreationTime
        ' Olusturulma tarihini döndürür.
        Label6.Text = fCreateDate.ToString

        Dim KlasorYol As DirectoryInfo = fInfo.Directory
        ' Bulundugu klasör bilgisi
        Label7.Text = KlasorYol.ToString()

        Dim KlasorIsmi As String = fInfo.DirectoryName
        ' Bulundugu klasör adi
        Label8.Text = KlasorIsmi

        Dim DosyaUzanti As String = fInfo.Extension
        ' Dosya uzantisini döndürür.
        Label9.Text = DosyaUzanti

        Dim fFullName As String = fInfo.FullName
        ' Tam dosya yolu
        Label10.Text = fFullName

        Dim fSize As Long = fInfo.Length
        ' Dosyanin byte cinsinden boyutu
        Label11.Text = fSize.ToString()

        Dim fName As String = fInfo.Name
        ' Dosyanin adi
        Label12.Text = fName

Dosya islemleriyle alakali, internette birçok örnek proje bulabilirsiniz. Eger projenizde veri saklamak istiyorsaniz dosyaya yazmak yerine veritabani kullanmaniz daha uygun olacaktir. Dolayisiyla dosya islemleri daha çok uygulamanin konfigürasyonlarini kaydetmek için kullanilir.

Uygulama dosyasini buradan indirebilirsiniz.

  • 0
  • 252
  • 0

- BUNLARIDA GÖZDEN GEÇİREBİLİRSİNİZ -

HENÜZ YORUM YAPILMAMIŞ !

Yorum yazın

Hakkımda

BÜLTENİMİZE ABONE OLUN

SOSYAL AĞLAR

  • Bana yazın