Folder Locker with password in Batch Script


ne mau berbagi script lama ane yg ane bikin waktu pertama x blajar pemahaman listing logika suatu script….script ini berbasis command dgn extention .BAT…ane kasih nama simple aplikasi ini dgn nama ” Folder Locker with password “…panjang amat nama’a…ya gitu deh…soal’a tehnik penguncian’a ( lebih tepatnya penyembunyian ) folder’a menggunakan password…

langsung ajja deh…dari pda pusing ngoceh mulu….

o’ya tujuan’a script ini sih supaya agan2 yang baru belajar tentang script apapun itu bahasa pemogramannya memahami dulu yg dimaksud dgn listing logika, soal’a ane berpendapat, jika kita ingin melakukan sesuatu yg besar haruslah memulainya dari sesuatu yg kecil…maksud’a untuk memahami bhs pemograman tingkat tinggi, kita harus blajar tahap demi tahap’a dari script2 sederhana sebagai perangsang untuk pemahaman logika serta syntax2’a….

nah ini script’a….silahkan copas ke notepad dan pahami setiap syntax’a….

Script ini Pernah ane Posting di SYC…….:)

============= Start Script =================

@echo off

color 0b

mode 50,10

title Folder Locker with Password by bL4cK HoLes

if EXIST “Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}” goto awal

if exist “c:\password\” goto awal

echo.

echo == [*] Bikin 1 Folder untuk data Pribadi

echo.

echo.

set /p “pil= [ Tekan Enter ]”

Goto:bikin

:awal

cls

echo.

echo == [1] Ganti Password

echo == [2] Kunci Folder

echo == [3] Buka Kunci

echo == [4] Lupa Password

echo == [5] Exit

echo.

set /p “pil= Pilih No > ”

if %pil%==1 goto ganti

if %pil%==2 goto BUKAKUNCI

if %pil%==3 goto BUKAKUNCI

if %pil%==4 goto FORGOTPASS

if %pil%==5 goto End

msg * No yang anda masukan salah

goto:awal

:ganti

cls

title Ganti Password

echo.

set /p “ganpass= Nama Folder > ”

set dir=Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}

if EXIST “%dir%” goto SETPASS

if EXIST “%ganpass%” goto SETPASS

if NOT EXIST “%ganpass%” goto NOEXS

msg * Anda tidak memasukan nama Folder apapun…Please try again..!!

goto:ganti

:NOEXS

msg * Nama Folder tidak ada/bukanlah sebagai Folder Pribadi…Please try again

goto:awal

:PASSLAM

cls

msg * Anda sudah memiliki Password untuk Nama Folder ini, silahkan masukan Password lama anda..!!

echo.

set /p “nampass= Password Lama > ”

if exist “c:\password\%namfol%\%nampass%.pas” goto DELPASSLAM

msg * Password yang anda masukan salah..Please try again..!!

goto:PASSLAM

:DELPASSLAM

cls

del “c:\password\%namfol%\%nampass%.pas”

echo.

set /p “barpass= Password Baru > ”

echo password> c:\password\%namfol%\%barpass%.pas

msg * Password berhasil di Ubah…Harap diingat Password anda adalah %barpass%.

goto:awal

:SETPASS

cls

echo.

set /p “nampass= Password Lama > ”

if exist “c:\password\%ganpass%\%nampass%.pas” goto DELPASS

if NOT exist “c:\password\%ganpass%\%nampass%.pas” goto NOTEXPASS

msg * Karakter yang anda masukan salah..Please try again..!!

goto:SETPASS

:DELPASS

cls

del “c:\password\%ganpass%\%nampass%.pas”

echo.

set /p “barpass= Password Baru > ”

echo password> c:\password\%ganpass%\%barpass%.pas

msg * Password berhasil di Ubah…Harap diingat Password anda adalah %barpass%.

goto:awal

:NOTEXPASS

msg * Password lama yang anda masukan SALAH..Please try again..!!

goto:SETPASS

:bikin

cls

echo.

set /p “namfol= Nama Folder > ”

set dir=Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}

if EXIST “Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}” goto UNLOCK

if NOT EXIST “%namfol%” goto MDLOCKER

:CONFIRM

echo.

msg * Folder %namfol% Sudah ada,Pilih (Y/N) untuk mulai mengunci.

goto:KUNCI

:BUKAKUNCI

cls

echo.

set /p “bukun= Nama Folder > ”

if NOT exist “c:\password\%bukun%\” goto NOEXS

set dir=Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}

if EXIST “%dir%” goto UNLOCKBUKUN

if EXIST “%bukun%” goto KUNCIBUKUN

msg * Nama Folder %bukun% tidak ada.

goto:awal

:KUNCIBUKUN

title Kunci Folder %bukun%

cls

echo Anda yakin ingin mengunci folder ini?

echo.

set/p “cho=(Y/N) > ”

if %cho%==Y goto LOCKBUKUN

if %cho%==y goto LOCKBUKUN

if %cho%==n goto END

if %cho%==N goto END

msg * Karakter yang anda masukan SALAH…!!!

goto KUNCIBUKUN

:KUNCI

cls

echo Anda yakin ingin mengunci folder ini?

echo.

set/p “cho=(Y/N) > ”

if %cho%==Y goto LOCK

if %cho%==y goto LOCK

if %cho%==n goto END

if %cho%==N goto END

msg * Karakter yang anda masukan SALAH…!!!

goto KUNCI

:LOCKBUKUN

set dir=Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}

ren %bukun% “%dir%”

attrib +h +s “%dir%”

msg * Folder berhasil DIKUNCI..!!

goto End

:LOCK

set dir=Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}

ren %namfol% “%dir%”

attrib +h +s “%dir%”

msg * Folder berhasil DIKUNCI..!!

goto End

:UNLOCKBUKUN

title Buka Kunci Folder %bukun%

cls

echo.

echo Masukan Password untuk membuka Folder %bukun%..!!

echo.

set/p “ps= Password >”

if NOT exist “c:\password\%bukun%\%ps%.pas” goto FAIL

attrib -h -s “%dir%”

ren “%dir%” %bukun%

msg * Folder berhasil DIBUKA..!!

goto End

:UNLOCK

cls

echo.

msg * Folder Pribadi anda tidak boleh lebih dari 1 folder.

echo Masukan Nama Folder dan Password Lama anda!!

echo.

set /p “namfol= Nama Folder > ”

echo.

set/p “ps= Password >”

if NOT exist “c:\password\%namfol%\%ps%.pas” goto FAIL

attrib -h -s “%dir%”

ren “%dir%” %namfol%

msg * Folder berhasil DIBUKA..!!

goto End

:FAIL

cls

msg * password yang anda masukan SALAH..atau folder %bukun% memang tidak ada!!

goto awal

:MDLOCKER

md %namfol%

msg * Folder %namfol% berhasil dibuat..

if exist “c:\password\” goto CREATEPASSFOL

md “c:\password\”

goto:CREATEPASSFOL

:CREATEPASSFOL

echo.

if exist c:\password\%namfol%\ del /f /q c:\password\%namfol%\

if NOT exist c:\password\%namfol%\ md c:\password\%namfol%\

title Create Password for your Folder

set /p “barpass= Password > ”

echo password > “c:\password\%namfol%\%barpass%.pas”

msg * Buatlah pertanyaan rahasia anda..[ berguna jika anda Lupa password ]!!

:SECURE

echo.

title Create Security Question

set /p “question= Security Question > ”

echo.

title Create Answer

set /p “answer= Jawaban > ”

echo.

set /p “sure= Anda yakin akan menyimpan Jawaban ini?[ Y/N ] > ”

if %sure%==y goto GOOD

if %sure%==Y goto GOOD

if %sure%==n goto SECURE

if %sure%==N goto SECURE

msg * Karakter yang anda masukan salah, ketik [Y/N]…please try again..!!

goto:SECURE

:FORGOTPASS

title Forgot Password

cls

echo.

set /p “namfol= Nama Folder > ”

set dir=Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}

if EXIST “%dir%” goto ANSWER

if EXIST “%namfol%” goto ANSWER

goto:NOEXS

:ANSWER

msg * Jawablah Pertanyaan keamanan berikut..!!

Title Pertanyaan :

cls

echo.

type “c:\password\%namfol%\%namfol%.que”

echo.

set /p “jawab= Jawaban > ”

if EXIST “c:\password\%namfol%\%jawab%.ans” goto RESPASS

goto:wrong

:RESPASS

cls

msg * Jawaban anda benar, Silahkan Reset Password anda..!!

title Reset your Password

echo.

set /p “barpass= Password Baru > ”

del “c:\password\%namfol%\*.pas”

echo password> c:\password\%namfol%\%barpass%.pas

msg * Password berhasil di Ubah…Harap diingat Password anda adalah %barpass%.

goto:awal

:wrong

msg * Maaf Jawaban yang anda berikan salah…Please try again..!!

goto:awal

:GOOD

echo %question% > “c:\password\%namfol%\%namfol%.que”

echo %answer% > “c:\password\%namfol%\%answer%.ans”

msg * Password dan Security Question berhasil dibuat…

msg * Harap diingat Password anda adalah %barpass% dan jawaban dari %question% adalah %answer%.

:End

exit

========== END SCRIPT ===============

Save script diatas dengan extention .BAT…dan cb running….

work 100% with win 7 Ultimate….

nb : folder yang agan bikin dan script ini harus berada di satu directory….

silahkan kembangkan agar menjadi lebih baik lagi.

Author: Black Holes

Indonesian Cyber Center

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s