programsız dosya kilitleme DENENMİŞTİR

Aşağıda yazan kodları , not defterine yapıştırın.

Code: cls @ECHO OFF title Folder Kilitli if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK if NOT EXIST Kilitli goto MDKilitli :CONFIRM echo Klasor kilitlensin mi?(e/h) set/p "cho=>" if %cho%==e goto LOCK if %cho%==E goto LOCK if %cho%==h goto END if %cho%==H goto END echo Invalid choice. goto CONFIRM :LOCK ren Kilitli "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" echo Folder locked goto End :UNLOCK echo Sifreyi giriniz: set/p "pass=>" if NOT %pass%== BURAYA ŞİFRE YAZILACAK goto FAIL attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Kilitli echo Folder Unlocked successfully goto End :FAIL echo Invalid password goto end :MDKilitli md Kilitli echo Locker created successfully goto End :End

Daha Sonra Kodlamanın İçinde Bulunan Şifre Bölümüne Oluşturacağınız Bir Şifre Yazarak Metin Belgesini Farklı Kaydet Seçeneğinden Klasöre İsim Verip .bat olarak istediğimiz bir dizine kaydediyoruz.





Kaydetmiş Olduğunuz Dosya (.bat) Uzantısından Dolayı MS_DOS Dosyasına DÖnüşecektir.Şimdi Kaydetmiş Olduğunuz bu .bat Uzantılı Dosyaya Çift Tıkladığınızda Aynı Dizinde ''Kilitli'' İsminde Bir Klasör Oluştuğunu Göreceksiniz.Daha Sonra Tekrar .bat Uzantılı MS_DOS Dosyasına Çift Tıkladığınızda Aşağıdaki Uyarıyı Alacaksınız.



Şimdi Klasörümüz Hem Bulunduğu Yerden Yok Oldu Hem de Kilitlendi.
Tekrar Dosyamızı Açabilmemiz İçin MS_DOS Dosyamıza Çift Tıklıyoruz.



Artık Dosyamızı Görebiliyoruz.Tekrar Kilitleyip Saklamak İstediğimizde Her Açma-Kapama İşlemi İçin MS_DOS Dosyasına Çift Tıklamanız Yeterlidir.



Not : Klasör seçeneklerinden gizli dosya ve klasör göster , olarak işaretlerseniz bir işe yaramaz ..