VermanVendetta13
Новичок
- Сообщения
- 147
- Репутация
- 0
Вот получился такой код
Но во первых, кавычки мне прописать не удалось. Может знает кто как это сделать?
Во вторых, там где комментарий "пароль". Нужно вставить этот код
Но таким образом, что бы вместо вывода сообщения, то, что введено в поле input прописалось в строку блокнота.
Пытался сделать своими силами, но комп зависал окончательно. Без последнего кода не работают строки с кавычками.
Пожалуйста. Посоветуйте
Код:
Run("notepad.exe")
WinWaitActive("[class:Notepad]")
Send("cls")
Send ("{ENTER}")
Send("@ECHO OFF")
Send("{ENTER}")
Send("title Folder Private")
Send("{ENTER}")
Send("if EXIST "Compconfig Locker" goto UNLOCK")
Send("{ENTER}")
Send("if NOT EXIST Private goto MDLOCKER")
Send("{ENTER}")
Send(":CONFIRM")
Send("{ENTER}")
Send("echo Are you sure you want to lock the folder(Y/N)")
Send("{ENTER}")
Send("set/p "cho=>"")
Send("{ENTER}")
Send("if %cho%==Y goto LOCK")
Send("{ENTER}")
Send("if %cho%==y goto LOCK")
Send("{ENTER}")
Send("if %cho%==n goto END")
Send("{ENTER}")
Send("if %cho%==N goto END")
Send("{ENTER}")
Send("echo Invalid choice.")
Send("{ENTER}")
Send("goto CONFIRM")
Send("{ENTER}")
Send(":LOCK")
Send("{ENTER}")
Send("ren Private "Compconfig Locker"")
Send("{ENTER}")
Send("attrib +h +s "Compconfig Locker"")
Send("{ENTER}")
Send("echo Folder locked")
Send("{ENTER}")
Send("goto End")
Send("{ENTER}")
Send(":UNLOCK")
Send("{ENTER}")
Send("echo Enter password to unlock folder")
Send("{ENTER}")
Send("set/p "pass=>"")
Send("{ENTER}")
Send("if NOT %pass%==")
Send(""); Пароль
Send(" goto FAIL")
Send("{ENTER}")
Send("attrib -h -s "Compconfig Locker"")
Send("{ENTER}")
Send("ren "Compconfig Locker" Private")
Send("{ENTER}")
Send("echo Folder Unlocked successfully")
Send("{ENTER}")
Send("goto End")
Send("{ENTER}")
Send(":FAIL")
Send("{ENTER}")
Send("echo Invalid password")
Send("{ENTER}")
Send("goto end")
Send("{ENTER}")
Send(":MDLOCKER")
Send("{ENTER}")
Send("md Private")
Send("{ENTER}")
Send("echo Private created successfully")
Send("{ENTER}")
Send("goto End")
Send("{ENTER}")
Send(":End")
Но во первых, кавычки мне прописать не удалось. Может знает кто как это сделать?
Во вторых, там где комментарий "пароль". Нужно вставить этот код
Код:
#include <GUIConstants.au3>
GUICreate(" My GUI input acceptfile", 320,120, @DesktopWidth/2-160, @DesktopHeight/2-45, -1, 0x00000018); WS_EX_ACCEPTFILES
$file = GUICtrlCreateInput ( "", 10, 5, 300, 20)
GUICtrlSetState(-1,$GUI_DROPACCEPTED)
GUICtrlCreateInput ("", 10, 35, 300, 20) ; will not accept drag&drop files
$btn = GUICtrlCreateButton ("Ok", 40, 75, 60, 20)
GUISetState ()
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $btn
exitloop
EndSelect
Wend
MsgBox (4096, "drag drop file", GUICtrlRead($file))
Пытался сделать своими силами, но комп зависал окончательно. Без последнего кода не работают строки с кавычками.
Пожалуйста. Посоветуйте