Изменить имя для входа в систему на удаленном компьютере

01.12.2015, 05:43. Показов 982. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Здравствуйте, появилась проблемка со сменой Winlogon на удаленных компьютерах.
Написал вот такой скрипт на .vbs, его можно запустить из cmd и передать параметр, например,
c:\1.vbs Logon1

Сам код:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
'Передача из CMD
Dim Arg
Set Arg=Wscript.Arguments
 
Dim sComp
sComp = ""
If Arg.Count>=1 Then  ' имеется переданный параметр
    StUser = Arg(0)
else
    StUser = InputBox("Введите имя подключаемого компьютера", "Настройка запуска ""Offer Remote Assistance""")
End IF
 
    dim WSHShell, stRegKey, objItem, intRetCode
    Set WSHShell = CreateObject("WScript.Shell")
    stRegKey = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" 'reestr
    'StUser = InputBox("Tell me login," & vbCrLf & vbCrLf & "Example - GilmullinRR", "Set Last logged on", "username") 'name
    'StDomain = InputBox("Tell me name - domain for logon," & vbCrLf & vbCrLf & "Example - Mechel", "Set Logon Domain", "Mechel") 'domain
    StDomain= "Mechel"
    wshShell.RegWrite stRegKey & "DefaultDomainName", StDomain, "REG_SZ"
    wshShell.RegWrite stRegKey & "DefaultUserName", StUser, "REG_SZ"
    wshShell.RegWrite stRegKey & "AltDefaultDomainName", StDomain, "REG_SZ"
    wshShell.RegWrite stRegKey & "AltDefaultUserName", StUser, "REG_SZ"
    wshShell.RegWrite stRegKey & "AutoAdminLogon", "0", "REG_SZ"

Как можно реализовать его запуск на удаленном компьютере через JS?
Пробовал следующее:

JavaScript
1
2
3
4
5
6
7
8
9
function RemoteAdm_WinLogon ()
    {
        var hostWL = ComputerName.value;
        var valueWL = ValueWinLogon.value;
        var logon = logonValue.value;
        var pass = passValue.value;
        var shell = new ActiveXObject("WScript.Shell");
        shell.Run('PsExec.exe '+"-u"+' '+logonValue+' '+"-p"+' '+passValue+' '+hostWL+' '+"%windir%\\system32\\cscript.exe"+' '+"\\10.2.10.93\\c$\\1.vbs"+' '+valueWL+'');
     }

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

01.12.2015, 05:43

Ответы с готовыми решениями:

Определить время последнего входа в систему пользователя на удаленном пк (PowerShell to C#)
Доброго времени суток, знатоки c#. есть код, который определяет время последнего входа в компьютер пользователя на удаленном компьютере в...

Вход в систему не возможен, так как на данном компьютере не запущена служба входа в сеть
После перезагрузки сервера на Windows server 2003, при попытки залогиниться стал выдавать такое сообщение: "Вход в систему не...

Изменить способ входа в систему.
Доброго! Такая вот проблемка. Не могу найти где в Windows 7 можно изменить способ входа в систему. В ХР это было в учетных записях...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

01.12.2015, 05:43

Помогаю со студенческими работами здесь

Как изменить параметры входа в систему?
Всем добрый день! На компьютере с Вин 8.1 имеется несколько пользователей. Часть с запароленным входом, часть нет. Система имеет...

Изменить окно входа в систему под Windows 7
Сразу извиняюсь, тк скорее всего пишу не по теме, просто подходящей не нашёл. Суть проблемы такова, нужно изменить окно входа в систему...

Как изменить вид страницы после входа в систему
Есть код главной страницы <? if (!defined('webid')) { exit(); } ?><h3>Добро пожаловать на <?=$sitename?></h3> ...

Написание программы для запуска bat-файла на удаленном компьютере
Здравствуйте, у меня возникла необходимость запускать файл с расширением .bat на удаленном компе (хостинг, предоставляемый другом) со...

Выполнение команды для удаления ветки реестра на удалённом компьютере
Проще говоря, мне необходимо выполнить комманду: reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Radmin\ /f на другом компьютере, находящемся...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .

Наверх