Показать сообщение отдельно
Непрочитано 17.02.2020, 19:38   #11
garniv
Мужской Модератор
 
Аватар для garniv
 
Регистрация: 29.06.2004
Цитата (Freerider) »
это подрозумевает вписать данные учетной записи в тот самый скрипт
Думаю что окошко (скрипт или что там у вас будет) просто представляет из себя графическю форму: с полем ввода пароля и кнопкой(ок/отмена). Оно запросит пароль пару раз, и если они совпадают - сделает Net user "юрезнейм" "пароль" /domain

Что-то типа
Код:
Dim strPass1, strPass2, passok
Set oShell = WScript.CreateObject ("WScript.Shell")

Do Until passok = 1
	strPass1 = InputBox("Введите пароль")
	strPass2 = InputBox("Повторите пароль")
	If strPass1 = strPass2 and strPass1<>"" Then
		oShell.run "cmd.exe /C ping ya.ru"
		Set oShell = Nothing'
		MsgBox ("Пароль успешно установлен")
		passok = 1
	Else MsgBox ("Пароли не совпадают! Повторите ввод пароля.")
	End if
Loop
__________________
Хочешь помочь новичку — делай вместе с ним. Хочешь помочь старику — делай вместо него. Хочешь помочь мастеру — отойди и не мешай. А хочешь помочь Таргитаю — сам Таргитай.

Последний раз редактировалось garniv; 17.02.2020 в 19:40.
garniv на форуме  
Конфигурация ПК
Ответить с цитированием