Dosyalarınızı kilitleyin kimse giremesin

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

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

r10'dan alıntıdır..

Hiç yorum yok:

Yorum Gönder