Faid's Blog™: Cara membuat "Folder Locker" tanpa software

Gini neh caranya bikin Folder Locker tanpa sofware, tinggal copass script di bawah ini ke dalam notepad dan save dengan ekstensi "*.bat", misal "Locker.bat" lalu jalankan deh, setelah dijalanin ikuti langkah2nya, sori kalo scripnya panjang, karena memang butuh script segini untuk lock dengan aman...
code:
@ECHO OFF
@COLOR 1F
@MODE 50,13
@TITLE Folder Locker
@SET "A=%MyFiles%"
@SET "B=C2F41D69-E2A7-5795-89E40080"
@SET "C=D4E221D2-3A5B-1069-52DD0600"
@SET "D=E65D24D8-98B5-68C0-BB820100"
@SET "E=F89CDCE2-B7C3-28FF-A9FA0070"
@IF EXIST "%A%\%B%" (
@ATTRIB +H +S +A "%A%\%B%" >NUL
)
@IF EXIST "%A%\%B%\%D%" (
@FOR /F "TOKENS=*" %%F IN (%A%\%B%\%D%) DO @SET "FD=%%F"
)
@IF EXIST "%A%\%B%\%E%" (
@FOR /F "TOKENS=*" %%S IN (%A%\%B%\%E%) DO @SET "SN=%%S"
)
@IF EXIST "%A%\%B%\%C%" @GOTO:KONFIRMASI0
@IF NOT EXIST "%A%\%B%\%C%" @GOTO:KONFIRMASI2
:KONFIRMASI0
@IF EXIST "%A%\%B%\%E%" @GOTO:KONFIRMASI1
@IF NOT EXIST "%A%\%B%\%E%" @GOTO:SANDIBARU1
:KONFIRMASI1
@IF EXIST "%A%\%B%\%C%" @GOTO:KONFIRMASIBUKA
@IF NOT EXIST "%A%\%B%\%C%" @GOTO:KONFIRMASIKUNCI
:KONFIRMASI2
@IF EXIST "%FD%" @GOTO:KONFIRMASI0
@IF NOT EXIST "%FD%" @GOTO:BUAT
:BUAT
@TITLE Folder Locker - [BUAT FOLDER]
@SET "PILIHAN="
@CLS
@ECHO. ________________________________________________
@ECHO. ANDA YAKIN MAU MEMBUAT FOLDER BARU ?
@ECHO. ------------------------------------------------
@ECHO. * Tulis "YA" untuk membuat folder baru.
@ECHO. * Tulis "TIDAK" untuk keluar.
@ECHO. ________________________________________________
@ECHO.
@SET /P "PILIHAN=ÿ¯ "
@IF NOT DEFINED PILIHAN (
@ECHO.
@ECHO. ¯ Pilihan Salah!!!
@PAUSE>NUL
@GOTO:BUAT
)
@IF /I "%PILIHAN%" EQU "Y" @GOTO:BUATNAMAFOLDER
@IF /I "%PILIHAN%" EQU "YA" @GOTO:BUATNAMAFOLDER
@IF /I "%PILIHAN%" EQU "T" @EXIT
@IF /I "%PILIHAN%" EQU "TIDAK" @EXIT
@ECHO.
@ECHO. ¯ Pilihan Salah!!!
@PAUSE>NUL
@CLS
@GOTO:BUAT
:BUATNAMAFOLDER
@SET "NAMAFOLDER="
@CLS
@ECHO. ________________________________________________
@ECHO. TULIS NAMA UNTUK FOLDER BARU ANDA !!!
@ECHO. ------------------------------------------------
@ECHO.
@SET /P "NAMAFOLDER=ÿ¯ "
@IF DEFINED NAMAFOLDER @GOTO:MEMBUAT
@IF NOT DEFINED NAMAFOLDER (
@ECHO.
@ECHO. ¯ Nama Kosong!!!
@PAUSE>NUL
@GOTO:BUATNAMAFOLDER
)
:MEMBUAT
@CLS
@ECHO. ________________________________________________
@ECHO. HARAP TUNGGU . . .
@ECHO. ------------------------------------------------
@IF NOT EXIST "%A%\%B%" @MD "%A%\%B%" >NUL
@IF EXIST "%A%\%B%" @ATTRIB +H +S +A "%A%\%B%" >NUL
@IF EXIST "%NAMAFOLDER%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal membuat folder.
@ECHO.
@ECHO. * Nama folder sudah ada.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF NOT EXIST "%NAMAFOLDER%" @MD "%NAMAFOLDER%" >NUL
@IF NOT EXIST "%NAMAFOLDER%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal membuat folder.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF EXIST "%A%\%B%\%D%" (
@ATTRIB -H -S -A "%A%\%B%\%D%" >NUL
@DEL "%A%\%B%\%D%" >NUL
)
@ECHO.%NAMAFOLDER%>"%A%\%B%\%D%"
@IF EXIST "%A%\%B%\%D%" (
@ATTRIB +H +S +A "%A%\%B%\%D%" >NUL
)
@IF NOT EXIST "%A%\%B%\%E%" (
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Folder baru berhasil dibuat.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk menetapkan sandi.
@PAUSE>NUL
@GOTO:SANDIBARU1
)
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Folder baru berhasil dibuat.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
:KONFIRMASIKUNCI
@TITLE Folder Locker - [KUNCI FOLDER]
@SET "PILIHAN="
@CLS
@ECHO. ________________________________________________
@ECHO. ANDA YAKIN MAU MENGUNCI FOLDER ANDA ?
@ECHO. ------------------------------------------------
@ECHO. * Tulis "YA" untuk mengunci folder Anda.
@ECHO. * Tulis "TIDAK" untuk keluar.
@ECHO. * Tulis "UBAH" untuk mengubah nama folder Anda.
@ECHO. * Tulis "GANTI" untuk mengganti sandi Anda.
@ECHO. ________________________________________________
@ECHO.
@SET /P "PILIHAN=ÿ¯ "
@IF NOT DEFINED PILIHAN (
@ECHO.
@ECHO. ¯ Pilihan Salah!!!
@PAUSE>NUL
@GOTO:KONFIRMASIKUNCI
)
@IF /I "%PILIHAN%" EQU "Y" @GOTO:MENGUNCI
@IF /I "%PILIHAN%" EQU "YA" @GOTO:MENGUNCI
@IF /I "%PILIHAN%" EQU "T" @EXIT
@IF /I "%PILIHAN%" EQU "TIDAK" @EXIT
@IF /I "%PILIHAN%" EQU "G" @GOTO:GANTISANDI1
@IF /I "%PILIHAN%" EQU "GANTI" @GOTO:GANTISANDI1
@IF /I "%PILIHAN%" EQU "U" @GOTO:UBAHNAMA
@IF /I "%PILIHAN%" EQU "UBAH" @GOTO:UBAHNAMA
@ECHO.
@ECHO. ¯ Pilihan Salah!!!
@PAUSE>NUL
@GOTO:KONFIRMASIKUNCI
:MENGUNCI
@CLS
@ECHO. ________________________________________________
@ECHO. HARAP TUNGGU . . .
@ECHO. ------------------------------------------------
@IF EXIST "%A%\%B%\%C%" (
@ATTRIB -H -S -A "%A%\%B%\%C%" >NUL
@RD/S/Q "%A%\%B%\%C%" >NUL
)
@IF EXIST "%FD%" @MOVE "%FD%" "%A%\%B%\" >NUL
@IF EXIST "%FD%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal mengunci folder.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF EXIST "%A%\%B%\%FD%" @REN "%A%\%B%\%FD%" "%C%" >NUL
@IF EXIST "%A%\%B%\%C%" (
@ATTRIB +H +S +A "%A%\%B%\%C%" >NUL
)
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Folder berhasil dikunci.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
:UBAHNAMA
@TITLE Folder Locker - [UBAH NAMA]
@SET "NAMABARU="
@CLS
@ECHO. ________________________________________________
@ECHO. TULIS NAMA BARU UNTUK FOLDER ANDA !!!
@ECHO. ------------------------------------------------
@ECHO.
@SET /P "NAMABARU=ÿ¯ "
@IF NOT DEFINED NAMABARU (
@ECHO.
@ECHO. ¯ Nama Kosong!!!
@PAUSE>NUL
@GOTO:UBAHNAMA
)
@IF EXIST "%NAMABARU%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal mengubah nama folder.
@ECHO.
@ECHO. * Nama folder sudah ada.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF EXIST "%FD%" @REN "%FD%" "%NAMABARU%" >NUL
@IF NOT EXIST "%NAMABARU%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal mengubah nama folder.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF EXIST "%A%\%B%\%D%" (
@ATTRIB -H -S -A "%A%\%B%\%D%" >NUL
@DEL "%A%\%B%\%D%" >NUL
)
@ECHO.%NAMABARU%>"%A%\%B%\%D%"
@IF EXIST "%A%\%B%\%D%" (
@ATTRIB +H +S +A "%A%\%B%\%D%" >NUL
)
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Nama folder berhasil diubah.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
:BUATNAMA
@TITLE Folder Locker - [BUAT NAMA]
@SET "NAMABARU="
@CLS
@ECHO. ________________________________________________
@ECHO. NAMA FOLDER BELUM DITETAPKAN, TULIS NAMA BARU !!
@ECHO. ------------------------------------------------
@ECHO.
@SET /P "NAMABARU=ÿ¯ "
@IF NOT DEFINED NAMABARU (
@ECHO.
@ECHO. ¯ Nama Kosong!!!
@PAUSE>NUL
@GOTO:BUATNAMA
)
@IF NOT EXIST "%NAMABARU%" @MD "%NAMABARU%" >NUL
@IF NOT EXIST "%NAMABARU%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal membuat nama folder.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF EXIST "%NAMABARU%" @RD "%NAMABARU%" >NUL
@IF EXIST "%A%\%B%\%D%" (
@ATTRIB -H -S -A "%A%\%B%\%D%" >NUL
@DEL "%A%\%B%\%D%" >NUL
)
@ECHO.%NAMABARU%>"%A%\%B%\%D%"
@IF EXIST "%A%\%B%\%D%" (
@ATTRIB +H +S +A "%A%\%B%\%D%" >NUL
)
@GOTO:MEMBUKA
:GANTISANDI1
@TITLE Folder Locker - [GANTI SANDI]
@SET "PASSWORD="
@CLS
@ECHO. ________________________________________________
@ECHO. MASUKKAN SANDI !!!
@ECHO. ------------------------------------------------
@ECHO.
@SET /P "PASSWORD=ÿ¯ Masukkan Sandi Lama : "
@IF NOT DEFINED PASSWORD (
@ECHO.
@ECHO. ¯ Sandi Salah!!!
@PAUSE>NUL
@GOTO:GANTISANDI1
)
@IF "%PASSWORD%"=="%SN%" @GOTO:GANTISANDI2
@ECHO.
@ECHO. ¯ Sandi Salah!!!
@PAUSE>NUL
@GOTO:GANTISANDI1
:GANTISANDI2
@SET "BARU1="
@CLS
@ECHO. ________________________________________________
@ECHO. MASUKKAN SANDI BARU !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. ¯ Masukkan Sandi Lama : OK
@ECHO.
@SET /P "BARU1=ÿ¯ Masukkan Sandi Baru : "
@IF DEFINED BARU1 @GOTO:GANTISANDI3
@IF NOT DEFINED BARU1 (
@ECHO.
@ECHO. ¯ Sandi Kosong!!!
@PAUSE>NUL
@GOTO:GANTISANDI2
)
:GANTISANDI3
@SET "BARU2="
@CLS
@ECHO. ________________________________________________
@ECHO. KONFIRMASI SANDI BARU !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. ¯ Masukkan Sandi Lama : OK
@ECHO.
@ECHO. ¯ Masukkan Sandi Baru : OK
@ECHO.
@SET /P "BARU2=ÿ¯ Konfirmasi Sandi : "
@IF "%BARU2%"=="%BARU1%" @GOTO:GANTISANDI4
@IF NOT DEFINED BARU2 (
@ECHO.
@ECHO. ¯ Sandi Kosong!!!
@PAUSE>NUL
@GOTO:GANTISANDI3
)
@IF NOT "%BARU2%"=="%BARU1%" (
@ECHO.
@ECHO. ¯ Sandi Salah!!!
@PAUSE>NUL
@GOTO:GANTISANDI2
)
:GANTISANDI4
@IF EXIST "%A%\%B%\%E%" (
@ATTRIB -H -S -A "%A%\%B%\%E%" >NUL
@DEL "%A%\%B%\%E%" >NUL
@ECHO.%BARU2%>"%A%\%B%\%E%"
)
@IF EXIST "%A%\%B%\%E%" (
@ATTRIB +H +S +A "%A%\%B%\%E%" >NUL
)
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Sandi berhasil diganti.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
:SANDIBARU1
@TITLE Folder Locker - [SANDI BARU]
@SET "BARU1="
@CLS
@ECHO. ________________________________________________
@ECHO. SANDI BELUM DITETAPKAN, BUAT SANDI BARU !!!
@ECHO. ------------------------------------------------
@ECHO.
@SET /P "BARU1=ÿ¯ Masukkan Sandi Baru : "
@IF DEFINED BARU1 @GOTO:SANDIBARU2
@IF NOT DEFINED BARU1 (
@ECHO.
@ECHO. ¯ Sandi Kosong!!!
@PAUSE>NUL
@GOTO:SANDIBARU1
)
:SANDIBARU2
@SET "BARU2="
@CLS
@ECHO. ________________________________________________
@ECHO. KONFIRMASI SANDI BARU !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. ¯ Masukkan Sandi Baru : OK
@ECHO.
@SET /P "BARU2=ÿ¯ Konfirmasi Sandi : "
@IF "%BARU2%"=="%BARU1%" @GOTO:SANDIBARU3
@IF NOT DEFINED BARU2 (
@ECHO.
@ECHO. ¯ Sandi Kosong!!!
@PAUSE>NUL
@GOTO:SANDIBARU2
)
@IF NOT "%BARU2%"=="%BARU1%" (
@ECHO.
@ECHO. ¯ Sandi Salah!!!
@PAUSE>NUL
@GOTO:SANDIBARU1
)
:SANDIBARU3
@IF EXIST "%A%\%B%\%E%" (
@ATTRIB -H -S -A "%A%\%B%\%E%" >NUL
@DEL "%A%\%B%\%E%" >NUL
)
@ECHO.%BARU2%>"%A%\%B%\%E%"
@IF EXIST "%A%\%B%\%E%" (
@ATTRIB +H +S +A "%A%\%B%\%E%" >NUL
)
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Sandi baru berhasil ditetapkan.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
:KONFIRMASIBUKA
@TITLE Folder Locker - [BUKA FOLDER]
@SET "PILIHAN="
@CLS
@ECHO. ________________________________________________
@ECHO. ANDA YAKIN MAU MEMBUKA FOLDER ANDA ?
@ECHO. ------------------------------------------------
@ECHO. * Tulis "YA" untuk membuka folder Anda.
@ECHO. * Tulis "TIDAK" untuk keluar.
@ECHO. ________________________________________________
@ECHO.
@SET /P "PILIHAN=ÿ¯ "
@IF NOT DEFINED PILIHAN (
@ECHO.
@ECHO. ¯ Pilihan Salah!!!
@PAUSE>NUL
@GOTO:KONFIRMASIBUKA
)
@IF /I "%PILIHAN%" EQU "Y" @GOTO:BUKA
@IF /I "%PILIHAN%" EQU "YA" @GOTO:BUKA
@IF /I "%PILIHAN%" EQU "T" @EXIT
@IF /I "%PILIHAN%" EQU "TIDAK" @EXIT
@ECHO.
@ECHO. ¯ Pilihan Salah!!!
@PAUSE>NUL
@GOTO:KONFIRMASIBUKA
:BUKA
@SET "PASSWORD="
@CLS
@ECHO. ________________________________________________
@ECHO. MASUKKAN SANDI !!!
@ECHO. ------------------------------------------------
@ECHO. Tulis "GANTI" untuk mengganti sandi Anda.
@ECHO. ________________________________________________
@ECHO.
@SET /P "PASSWORD=ÿ¯ Masukkan Sandi : "
@IF NOT DEFINED PASSWORD (
@ECHO.
@ECHO. ¯ Sandi Salah!!!
@PAUSE>NUL
@GOTO:BUKA
)
@IF "%PASSWORD%"=="%SN%" @GOTO:MEMBUKA
@IF /I "%PASSWORD%" EQU "G" @GOTO:GANTISANDI1
@IF /I "%PASSWORD%" EQU "GANTI" @GOTO:GANTISANDI1
@ECHO.
@ECHO. ¯ Sandi Salah!!!
@PAUSE>NUL
@GOTO:BUKA
:MEMBUKA
@CLS
@ECHO. ________________________________________________
@ECHO. HARAP TUNGGU . . .
@ECHO. ------------------------------------------------
@IF NOT EXIST "%A%\%B%\%D%" @GOTO:BUATNAMA
@IF EXIST "%A%\%B%\%D%" (
@FOR /F "TOKENS=*" %%F IN (%A%\%B%\%D%) DO @SET "FD=%%F"
)
@IF EXIST "%FD%" (
@CLS
@ECHO. ________________________________________________
@ECHO. KESALAHAN !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Gagal membuka folder.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
)
@IF EXIST "%A%\%B%\%C%" (
@ATTRIB -H -S -A "%A%\%B%\%C%" >NUL
REN "%A%\%B%\%C%" "%FD%" >NUL
)
@IF EXIST "%A%\%B%\%FD%" @MOVE "%A%\%B%\%FD%" ".\" >NUL
@CLS
@ECHO. ________________________________________________
@ECHO. BERHASIL !!!
@ECHO. ------------------------------------------------
@ECHO.
@ECHO. * Folder berhasil dibuka.
@ECHO.
@ECHO. * Tekan sembarang tombol untuk keluar.
@PAUSE>NUL
@EXIT
Faid's Blog™

My Blog Menu

Thursday, February 9, 2012

Cara membuat "Folder Locker" tanpa software

No comments:

Post a Comment
