Модераторы: Avada, CaptainFlint, Nik, d-view, Моторокер
Не, внутреннюю поддержку этого я делать не буду.KopBuH писал(а):вот если бы была поддержка чтения из WMI
Код: Выделить всё
RegRead AutorunKey "HKLM\Software\TC_Autorun" "sz" "AutorunKey" "Autorun"Код: Выделить всё
RegRead [/HEX] <имя_переменной> <адрес_ключа> <имя_значения> [<текст_по_умолчанию>]
[s]В этом случае в плагине придется по-сути повторять функционал ShellExec. Есть ли смысл? Можно просто опционально добавить чтение потока сразу после запуска в переменную. Должно уместиться в десяток строк кода.[/s]MVV писал(а):такой функции самое место в отдельном плагине.
Код: Выделить всё
+ команда ProcessExecGetOutput в плагине Process
+ команда RegRead
Код: Выделить всё
# Проверка локализации (языка) ОС
RegRead COMMANDER_OSLANG "HKCU\Control Panel\International" "Locale" "unknown"
# Проверка версии ОС
If %COMMANDER_OSLANG% = 00000419 Then
SetEnv COMMANDER_OSLANG "Rus"
ElseIf %COMMANDER_OSLANG% = 00000409 Then
SetEnv COMMANDER_OSLANG "Eng"
Else
SetEnv COMMANDER_OSLANG "%COMMANDER_OSLANG%"
EndIf
.Код: Выделить всё
If %ShowHiddensOnStart% = 0 Then
ElseIf %COMMANDER_ASADMIN% = 1 Then
ShellExec /EV "%COMMANDER_PATH%\Macroses\nircmd%COMMANDER_ARCH%.exe" "win show class TTOTAL_CMD"
Else
EndIfКод: Выделить всё
If %ShowHiddensOnStart% = 0 Then
ElseIf %COMMANDER_ASADMIN% = 1 Then
ShellExec /EV "%COMMANDER_PATH%\Macroses\nircmd%COMMANDER_ARCH%.exe" "win show class TTOTAL_CMD"
EndIfВ первую очередь - cscript. Для меня - Autoit, конечно.Flasher писал(а):Про stdout пока не думал. Есть какие-то идеи? Что там из полезного окромя cmd у нас выводит?
Код: Выделить всё
On Error Resume Next
Set strUserName = ""
Set WshShell = WScript.CreateObject( "WScript.Shell" )
Set WshSysEnv = WshShell.Environment( "PROCESS" )
strUserName = WshSysEnv( "USERNAME" )
Set objWMIService = GetObject( "winmgmts://./root/CIMV2" )
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_UserAccount", "WQL", &h30)
For Each objItem In colItems
If LCase( objItem.Name ) = LCase( strUserName ) Then
WScript.Stdout.Write objItem.SID
End If
Next
Код: Выделить всё
ProcessExecGetOutput SID cscript.exe "//Nologo get_sid.vbs"
SetEnv /EV USER_SID %SID%
Странно, не наблюдал ничего такого странного.KopBuH писал(а):но иногда почему то вылазиют странные сообщения плагина при выходе из ТС. причем не всегда
Можно в любой комбинации, минимально If..Endif.KopBuH писал(а):является ли такой код правильным:
Есть идеи? Нужно что-то применимое для многих.KopBuH писал(а):P.S.: Loopback, добавил бы в autorun.example.cfg пару примеров работы с RegRead
Я не думаю, что вообще есть смысл использовать скрипты для вывода потока, чтобы получить какое-то значение, записываемое в переменную среды, которое потом тем же скриптингом и будет обрабатываться. В этом нет практического смысла, на мой взгяд (если не брать какие-то совсем простые операции типа создания одноимённых папок и т.п.). Или, может, я чего не улавливаю?Loopback писал(а):В первую очередь - cscript. Для меня - Autoit, конечно.