Sys Admin Shell

This LDAP query should show you all users in your enviroment with exchange mailboxes that have OWA enabled . (&(objectCategory= user )(!protocolsettings=HTTP*0*)(msExchUserAccountControl=0)) This LDAP query should show you all users in your enviroment with exchange mailboxes that have OWA disabled. (&(objectCategory= user )(protocolsettings=HTTP*0*)(msExchUserAccountControl=0))

Script to delete media files Script Code: ------------------------------------------------------------------------------ strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colFiles = objWMIService.ExecQuery _ ("Select * from CIM_DataFile where Extension = 'mp3' OR Extension = 'wma' OR Extension = 'flv' OR Extension = 'jpg' OR Extension = 'mov' OR Extension = 'avi' OR Extension = '3gp' OR Extension = 'flv' OR Extension = 'vob' OR Extension = 'mpeg'") For Each objFile in colFiles objFile.Delete Next

Script to Delete files older than X days Usage: cscript c:\scripts\deloldfiles.vbs c:\windows\system32\logfiles 30 >> c:\scripts\iis.log Scrpit Code: ----------------------------------------------------------------------------------------- ' Objective: To delete old files from a given folder and all subfolders below ' ' Created by: MAK June 21, 2005 ' ' Format: cscript deloldfiles.vbs {DriveLetter:\FolderName} {#ofDays} ' or: cscript deloldfiles.vbs {\\servername\FolderName} {#ofDays} ' Example: cscript deloldfiles.vbs c:\dba\log 3 ' (deletes files older than 3 days from the \dba\log file on drive C:) Set objArgs = WScript.Arguments FolderName =objArgs(0) Days=objArgs(1) set fso = createobject("scripting.filesystemobject") set folders = fso.getfolder(FolderName) datetoday = now() newdate = dateadd("d", Days*-1, datetoday) wscript.echo "Today:" & now() wscript.echo "Started deleting files older than :" ...