Bir dosyanın belirtilen konumda olup olmadığını kontrol etmek için aşağıdaki kodu kullanabiliriz.
Dim dosya_varmi As Boolean= My.Computer.FileSystem.FileExists("C:\\Bilgi-Sayar.txt")
C:\\ klasörünün içinde Bilgi-Sayar.txt dosyası var ise Boolean türündeki değişkenin içine True
yazdırılır. Yoksa False
yazdırılır.
If dosya_varmi = True Then
MsgBox("Dosya var")
Else
MsgBox("Dosya yok")
End If
Bu kodu If
yapısı ile birleştirerek daha kullanışlı bir hale getirebilirsiniz.
Bir klasörün belirtilen konumda olup olmadığını kontrol etmek istersek aşağıdaki kodu kullanabiliriz.
Dim klasor_varmi As Boolean = My.Computer.FileSystem.DirectoryExists("C:\\Bilgi_Sayar")
C:\\ klasörünün içinde Bilgi_Sayar isimli bir klasör var ise Boolean türündeki değişkenin içine True
yazdırılır. Yoksa False
yazdırılır.
If klasor_varmi = True Then
MsgBox("Klasör var")
Else
MsgBox("Klasör yok")
End If
Bu koduda If
yapısı ile birleştirerek daha kullanışlı bir hale getirebilirsiniz.
Not: Projenize System.IO’yu import etmek zorundasınız. ( Import System.IO )
bi programım vardı sürekli bu kodlar üzerinden çalıştırıyordum aklıma o geldi nedense
Nasıl import edeceğiz
Resimde de görüldüğü üzere Public Class Form1 yazısının üstündeki satıra Imports System.IO yazarak import edeceğiz.