Showing posts with label Scripting. Show all posts
Showing posts with label Scripting. Show all posts

Cum salvezi in EventViewer toate comenziile executate in Exchange Management shell (EMS)

Daca doriti sa salvati in EventViewer toate comenziile executate in Exchange 2007 management shell , folositi urmatoarea cheia de registrii de mai jos .Ca si rezultat, toate comenziile executate in Exchange Shell vor fii salvate in eventviewer si va puteti intoarce la ele oricind. Astfel putem tine o istorie a schimbarilor facute zilnic.

set-itemproperty HKLM:\SOFTWARE\Microsoft\PowerShell\1\PowerShellSnapIns\Microsoft.Exchange.Management.PowerShell.Admin –Name

LogpipelineExecutionDetails -value 1

Cum trimitem parametri unui VBScript

Articol preluat de pe Winadmin
Daca ne-am plictisit sa modificam scripturile de fiecare data pentru a specifica numele serverului sau locul unde e lista, exista si o varianta mai buna. Porninrea scriptului cu parametri.
Pentru asta folosim colectia WScript.Arguments. Si putem verifica daca au fost specificati parametri folosing proprietatea Count:
arguments = WScript.Arguments.Count
Urmand a face si o verificare:
If arguments < 1 then 
  WScript.Echo “Ati uitat sa specificati parametrii. Exemplu: cscript script.vbs [parametru]”
 
  WScript.Quit
 
end If
Daca se trece mai departe
[Read more of this review]

Cum schimbi IP Settings din script

Articol preluat de pe WinAdmin
Chiar merge, nu e nevoie sa te duci pana la consola sistemului ca sa-i schimbi IP-ul, sa-l treci pe DHCP sau sa-i schimbi setarile pentru DNS/WINS. Merge din script. Si pentru ca majoritatea scripturilor pe care le folosesc sunt scrise in VBS o sa continui tot asa (pentru moment, ca studiez Powershell si Python).

Un exemplu pentru folosirea acestui script ar fi un subnet cu ip-uri puse static si unde trebuie sa schimbi adresa serverului de DNS la toate sistemele. Sau un sistem setat cu IP static pe care vrei sa-l treci pe DHCP. Hai sa vedem si cateva exemple.
Cand pentru numele calculatorului folosim “.” inseamna ca ne conectam la sistemul local. Scriptul urmator trece pe DHCP toate adaptoarele de retea care au TCP/IP activat:
strComputer = "." 
set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
 
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = 1")

[Read more of this review]

Reading from a text file - VBScript

Articol preluat de pe WinAdmin
In foarte multe cazuri cand folosim scripturi pentru administrare specificam numele serverului la care sa ne conectam sau ne folosim de o lista in care avem toate serverele. Lista se afla intr-un fisier text si arata cam asa:
Server1 
Server2
 
Server3
 
Server4
Ideea e ca aveam nevoie de un script care se va conecta la toate sisteme din lista si va face ceva. Ce va face nu e important acum Important e cum citim lista cu serverele. Iata si scriptul:
Const ForReading = 1 
[Read more of this review]