Помагите написать script
Модератор: Модераторы
Сообщений: 8
• Страница 1 из 1
domovoy
Хорошо с телнетом не помагаем а как нащет Автоматического обнавления, брандмаузер и так далее. Просто после переустановки винды многие слубы я отключаю хотелась бы написать скрипт чтобы это происходила автоматом нажал и забыл. Это волнует не только меня одного, многим была бы полезна эта инфа.
Хорошо с телнетом не помагаем а как нащет Автоматического обнавления, брандмаузер и так далее. Просто после переустановки винды многие слубы я отключаю хотелась бы написать скрипт чтобы это происходила автоматом нажал и забыл. Это волнует не только меня одного, многим была бы полезна эта инфа.
- biruk
- Активный пользователь
- Сообщения: 1134
- Зарегистрирован: 19 июл 2004, 11:30
- Откуда: Москва
Цитата |
Хорошо с телнетом не помагаем а как нащет
[/quote] помогаем, это когда ты гришь "я сделал то-то и то-то, а то, что ожидал не сделалось, с выдачей сообщения <bla-bla-bla #12p487> " Понял? а то что ты просишь - это сделать за тебя. А на решение тебе уже намекнули... Вощщем, в бобруйск! Trust me - i know what i’m doing © Sledge Hummer
sata
Любые службы отключаются и включаются через GPO, как уже написал domovoy. Задача админа после переустановки винды, ввести комп в домен, а весь этот процесс выполняется тоже автоматически. Если хочешь писАть скрипты, то для начала изучи net start/stop "имя сервиса", а потом VBS+WMI. ' ReStartService.vbs ' Sample script to Stop or Start a Service ' www.computerperformance.co.uk/ ' Created by Guy Thomas December 2005 Version 2.4 ' -------------------------------------------------------' Option Explicit Dim objWMIService, objItem, objService Dim colListOfServices, strComputer, strService, intSleep strComputer = "." intSleep = 15000 WScript.Echo " Click OK, then wait " & intSleep & " milliseconds" 'On Error Resume Next ' NB strService is case sensitive. strService = " 'Alerter' " Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" _ & strComputer & "\root\cimv2") Set colListOfServices = objWMIService.ExecQuery _ ("Select * from Win32_Service Where Name ="_ & strService & " ") For Each objService in colListOfServices objService.StopService() WSCript.Sleep intSleep objService.StartService() Next WScript.Echo "Your "& strService & " service has Started" WScript.Quit ' End of Example WMI script to Start / Stop services Достаточно?
Сообщений: 8
• Страница 1 из 1
Кто сейчас на конференцииСейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9 |