warrus12345
10-01-2016, 14:47
Здравствуйте имею вот такие наработки(в архиве во вложении), задумка такая есть компьютеры очень много они не в домене, необходимо по нажатии кнопок, происходило считывание: груповых политик, настройка служб, реестр,на эталонном пк, затем все файлы подбираются в одну папку со скриптом, скидываются на флешку и закидываются на нужный пк, на нем нажимаем кнопку записать и все настройки меняются на нужные нам. Просто и удобно думаю программа очень нужная и пригодится многим.
Пока в AUTOIT еще новичек, что смог то написал), буду рад конструктивной критике и помощи, можем вместе довести до ума и внести свой вклад в развитие такой темы,я считаю очень актуальной и на данный момент не имеющей готового решения, если пк не в домене естественно.
Твкже хотелось бы узнать как можно скриптом создать пользователя автоматически.
#Include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("GPUpdate v1.0", 230, 200, 200, 100)
$Form2 = GuiCtrlCreatePic("logo.jpg",100,10,45,38)
$Form3 = GUICtrlCreateLabel("Нажмите Read на эталонном ПК:",17,55,300,15)
$Form4 = GUICtrlCreateLabel("Нажмите Write на целевом ПК:",17,105,300,15)
$Button1 = GUICtrlCreateButton("Read",16, 74, 200, 25)
$Button2 = GUICtrlCreateButton("Write", 16, 122, 201, 25)
$Button3 = GUICtrlCreateButton("?",105, 165, 20, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Run('C:\Users\ruslan\Desktop\Новая папка\gpuread.bat')
ConsoleWrite('gpuread ' & @MSEC & @CRLF)
Case $Button2
Run('C:\Users\ruslan\Desktop\Новая папка\gpwrite.bat')
ConsoleWrite('gpwrite ' & @MSEC & @CRLF)
Case $Button3
Run('notepad.exe '&'"'&@ScriptDir&'\help.txt"'&@SW_MAXIMIZE)
ConsoleWrite('help ' & @MSEC & @CRLF)
EndSwitch
WEnd
код батника gpuread
secedit /export /cfg c:\security_settings.inf
код батника gpuwrite
secedit /configure /db secpol.sdb /cfg c:\security_settings.inf /overwrite
Пока в AUTOIT еще новичек, что смог то написал), буду рад конструктивной критике и помощи, можем вместе довести до ума и внести свой вклад в развитие такой темы,я считаю очень актуальной и на данный момент не имеющей готового решения, если пк не в домене естественно.
Твкже хотелось бы узнать как можно скриптом создать пользователя автоматически.
#Include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("GPUpdate v1.0", 230, 200, 200, 100)
$Form2 = GuiCtrlCreatePic("logo.jpg",100,10,45,38)
$Form3 = GUICtrlCreateLabel("Нажмите Read на эталонном ПК:",17,55,300,15)
$Form4 = GUICtrlCreateLabel("Нажмите Write на целевом ПК:",17,105,300,15)
$Button1 = GUICtrlCreateButton("Read",16, 74, 200, 25)
$Button2 = GUICtrlCreateButton("Write", 16, 122, 201, 25)
$Button3 = GUICtrlCreateButton("?",105, 165, 20, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Run('C:\Users\ruslan\Desktop\Новая папка\gpuread.bat')
ConsoleWrite('gpuread ' & @MSEC & @CRLF)
Case $Button2
Run('C:\Users\ruslan\Desktop\Новая папка\gpwrite.bat')
ConsoleWrite('gpwrite ' & @MSEC & @CRLF)
Case $Button3
Run('notepad.exe '&'"'&@ScriptDir&'\help.txt"'&@SW_MAXIMIZE)
ConsoleWrite('help ' & @MSEC & @CRLF)
EndSwitch
WEnd
код батника gpuread
secedit /export /cfg c:\security_settings.inf
код батника gpuwrite
secedit /configure /db secpol.sdb /cfg c:\security_settings.inf /overwrite