Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /* INFO NAJEEB OPENSSL FILES ENCRYPTION
- Written by: Najeeb Shah Khan (najeebshahkhan@gmail.com)
- Last Modified: 1-25-2024
- */
- ;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ;#warn
- #NoEnv
- #SingleInstance, Force
- SetBatchLines, -1
- setworkingdir,%a_scriptdir%
- ;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- SkinForm(Apply, A_ScriptDir . "\DATA\USkin.dll", A_ScriptDir . "\DATA\M1.msstyles")
- OnExit, GetOut
- ;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- Gui,default
- Gui,Color, 091D33, 091D33
- Gui,Font, s12 cDDDDDD, Calibri
- Gui, Add, Button, x10 y10 w100 h30 gEncrypt, Encrypt Files
- Gui, Add, Button, x120 y10 w100 h30 gDecrypt, Decrypt Files
- Gui, Show, , File Encryption Tool
- return
- Encrypt:
- Gui, Submit, NoHide
- ; Get the list of files to encrypt
- FileSelectFile, FilesToEncrypt, 3,, Select files to encrypt, (*.*)|*.*
- ; Check if the user selected any files
- if (FilesToEncrypt) {
- ; Use OpenSSL to encrypt the files
- RunWait, DATA\openssl.exe enc -aes-256-cbc -salt -in %FilesToEncrypt% -out encrypted_files.enc
- ; Provide feedback to the user
- MsgBox, Encryption complete. Output saved to encrypted_files.enc.
- } else {
- MsgBox, No files selected for encryption.
- }
- return
- Decrypt:
- Gui, Submit, NoHide
- ; Get the file to decrypt
- FileSelectFile, EncryptedFile, 1,, Select file to decrypt, (*.enc)|*.enc
- ; Check if the user selected any file
- if (EncryptedFile) {
- ; Use OpenSSL to decrypt the file
- RunWait, DATA\openssl.exe enc -aes-256-cbc -d -in %EncryptedFile% -out decrypted_files.mp4
- ; Provide feedback to the user
- MsgBox, Decryption complete. Output saved to decrypted_files.
- } else {
- MsgBox, No file selected for decryption.
- }
- return
- ;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- GetOut:
- ;GuiClose:
- Gui, Hide
- SkinForm(0)
- ExitApp
- Return
- SkinForm(Param1 = "Apply", DLL = "", SkinName = ""){
- if(Param1 = Apply){
- DllCall("LoadLibrary", str, DLL)
- DllCall(DLL . "\USkinInit", Int,0, Int,0, AStr, SkinName)
- }else if(Param1 = 0){
- DllCall(DLL . "\USkinExit")
- }
- }
- ;============ END SCRIPT BUTTON_MENU ==============
- #R::Reload
- #S::Suspend
- #P::Pause
- #ESC::ExitApp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement