Команды из под vbs

Иногда бывают случаи когда по каким-либо причинам не получается использовать пакетный файл для выполнения команды, можно воспользоваться скриптом в котором содержится команда, скрипт будет иметь следующий вид:

Set objShell = CreateObject("WScript.Shell")
objShell.Run "cmd /c echo n|команда", 1, True

Скрытие сервера в сетевом окружении

Чтобы сервер не "светился" в сети достаточно ввести команду и его перезагрузить

net config server /hidden:yes

Альтернативой команды является параметр hidden в секции lanmanserver реестра.

Скрипт удаления "лишних" локальных администраторов

В некоторых случаях необходимо чтобы чистилась группа "Администраторы". Для этого можно использовать скрипт:



On Error Resume Next
strComputer = "."






Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")






Set colAccounts = objWMIService.ExecQuery ("Select * From Win32_Group Where LocalAccount = TRUE And SID = 'S-1-5-32-544'")






For Each objAccount in colAccounts
    AdmGrName = objAccount.Name
Next






Set GroupAdm = GetObject("WinNT://" & StrComputer & "/" & AdmGrName & ",group")




Set a = GroupAdm.members()
For Each b In a
    c = b.Name
    c = CStr(c)




    Select Case c                                                                
                Case "Domain Admins"


                Case "Администратор"
                Case "Administrator"




                Case Else
                                GroupAdm.Remove b.ADsPath
    End Select




Next

Ограничение локального входа

По умолчанию на серверах Windows 2003 разрешен локальный вход. Опытным пользователям и просто Пользователям. Подобные меры также рекомендуется делать на рабочих станциях, разрешить вход, например, только определенным группам пользователей. Как правило это ни к чему, поэтому отключаем это политикой:

Если пользователи работают только за одной рабочей станцией, ограничим им вход только на этот компьютер:
В оснастке Active Directory Users and Computers находим нужно пользователя, открываем его свойства, переходим на вкладку Account и нажимаем кнопку Logon to... В появившемся окне указываем конкретную машину.

Сервер терминалов и 1с

Часто бывает, особенно на 64-х разрядной Windows Server, долго завершается сеанс, до нескольких минут. Если прибить процесс userinit, то все завершится быстро. Причину уже не помню, но можно сделать следующий финт ушами и воспользоваться таким костылем:

Удаленное включение RDP

Для того чтобы включить удаленно RDP и не бежать к серверу чтобы поставить галочку соответствующую, можно в командной строке ввести следующее:

wmic /node:"HOSTNAME" /user:"DOMAIN\USER" path win32_terminalservicesetting where (__Class!="") call setallowtsconnections 1

EventID 8, crypt32

Иногда возникает такая ошибка в журнале:

Windows Server Blog

Этот блог является памяткой админа, в которых описаны пути решения некоторых ошибок и неприятных ситуаций, а также некоторые советы по работе.