Scripts for IT

Sub main() Const ADS_SCOPE_SUBTREE = 2 Set objConnection = CreateObject(“ADODB.Connection”) Set objCommand = CreateObject(“ADODB.Command”) objConnection.Provider = “ADsDSOObject” objConnection.Open “Active Directory Provider” Dim i Set objCommand.ActiveConnection = objConnection Set objRootDSE = GetObject(“LDAP://rootDSE”) strAdsPath = “LDAP://” & objRootDSE.Get(“defaultNamingContext”) i = 2 objCommand.CommandText = _     “Select Name, canonicalName, operatingSystem, ” & _     “operatingSystemVersion, operatingSystemServicePack, ” & [...]

To disable the firewall portion of Windows Firewall with Advanced Security from a command prompt Open an Administrator: Command Prompt. To do so, click Start, click All Programs, click Accessories, right-click Command Prompt, and then click Run as administrator. If the User Account Control dialog box appears, confirm that the action it displays is what [...]

Availability refers to a level of service provided by applications, services, or systems. Highly available systems have minimal downtime, whether planned or unplanned.

Here is a shell script to convert call recorded by Asterisk to mp3 format and move them to year/month/date wise folder structure. This script has the ability to separate files of different call queue in different folders.

Here is a script to monitor status of services on remote computer. This script checks all services which are marked as automatic, and mail the service status report.

Here is a shell script to monitor or disk space on Linux and send an email alert if the (free available) percentage of space is >= 90%

Users filling up hard drive on their computers? Use this script for identifying the computers running low on disk space.