Visual Basic Gizli Dosya Bulma
Öncelikle Kütüphanemizden System.IO çağırıyoruz
Bunun için Kod bölümünün en üstüne aşağıdaki kod’u ekliyoruz.
|
1 |
Imports System.IO |
Şimdi bir button ekleyip içine şu kodları yazıyoruz .
|
1 2 3 4 5 |
If File.GetAttributes("C:\Dosya.exe") And vbHidden Then MsgBox("Dosya var") Else MsgBox("Dosya yok") EndIf |
‘ If File.GetAttributes(“C:\Dosya.exe”) And vbHidden Then’ ile dosyamızın konumunu belirttik vbHidden ilede dosya gizli ise kodunu ekledik.
‘Msgbox(“Dosya var”)’ burda ise dosya var ise yapılacak işlemi yazdık.
‘MsgBox(“Dosya yok”)’ burda ise dosya yok ise yapılacak işlemi yazdık.
Leave a reply