ZeVSalt
Я не лупоглазый, это прищур такой !
- Сообщения
- 136
- Репутация
- 0
Здравствуйте господа.
Подскажите пути решения вопроса.
Необходимо переименовать компьютеры и имена пользователей в локальной сети, согласно текстового файла расположенного на сервере.
Файл предполагаю вида:
[box title=Содержимое файла Rename_User.txt]192.168.0.150 User1 Comp1
192.168.0.155 User2 Comp2[/box]
Примерно накидал, но как считать из файла заморачиваюсь :-[
Строк в файле около 500
Подскажите пути решения вопроса.
Необходимо переименовать компьютеры и имена пользователей в локальной сети, согласно текстового файла расположенного на сервере.
Файл предполагаю вида:
[box title=Содержимое файла Rename_User.txt]192.168.0.150 User1 Comp1
192.168.0.155 User2 Comp2[/box]
Код:
; Запускаем скрипт с админскими правами
#requireadmin
#include <GUIConstants.au3>
#include <file.au3>
;~ Открытие файла
$oFile = FileOpen ( @ScriptDir & "\" & "Rename_User.txt" , 0)
;~ проверка IP
$IPAddress = @IPAddress1
;~ Считывание переменных из файла
$read_IPAdress = (Здесь переменная считаная из файла)
$read_UserName = (Здесь переменная считаная из файла)
$read_CompName = (Здесь переменная считаная из файла)
;~ Переименование
If $IPAddress = $read_IPAdress Then
$RenameUser = _RunDos ("wmic UserAccount where Name=" & '"%USERNAME%"' & " call Rename Name=" & '"' & $read_UserName & '"')
$RenameComp = _RunDos ("wmic computersystem where name=" & '"%computername%"' & " rename " & '"' & $read_CompName & '"')
Else
Exit
EndIf
FileClose($oFile)
Примерно накидал, но как считать из файла заморачиваюсь :-[
Строк в файле около 500