script

Так уж получилось, что централизованное резервное копирование не всегда можно использовать. Вот и у меня возникла необходимость (хоть я и не любитель "плодить зоопарков") в резервном копировании нескольких папок не системой Arcserve (на ленту), а на сетевое хранилище.

Set objEmail = CreateObject("CDO.Message")
set objConf = CreateObject("CDO.Configuration")
 
Set objFlds = objConf.Fields
With objFlds
  .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mailserver"
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
  '.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic
  .Update
End With
Set wshshell = CreateObject("WScript.Shell")
Set objEmail.Configuration = objConf
 
objEmail.From = "backup@rublin.org.ua"
objEmail.To = "admin@rublin.org.ua"
objEmail.Subject = "Backup JOB"
objEmail.Textbody = "I am OK. See log in addattachment."
objEmail.Addattachment "\\sns\Backup\D\fullbackup.log"
objEmail.Send

Используя подключение к корпоративной сети через IPSec (а это, как минимум, безопаснее чем PPTP), сталкиваешся с дополнительными трудностями. Например, нужно реализовать возможность получения сертификата на клиенте. Для доменных компьютеров это не проблема - корневой сертификат выдается автоматом, а пользовательский несложно получить. Для недоменных (сторонних) компьютеров сложнее. Об этом дальше...

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

В связи с изменениями в правилах набора телефонных номеров, появилась необходимость в быстром и глобальном редактировании корпоративной адресной книге. LDAP у нас в AD, по этому редактировать будем свойства пользователей. В чем суть? Нужно номера телефонов в виде 8050... изменить на +38050...

Треба було виконать одну задачку для досить великої мережі: переустановить СМС агент на клієнських машинах зі зміною сайту. От і навояв такий скриптець, розповсюджується груповими політиками. Потребуються адмінські (єстєствєнно:) права. Ітак, СКРИПТ: