Xenserver Missing Removable storage Drives
Some times when USB drives have been plugged in for a long time they seems to disappear. Normally that’s not a problem you just unplug them and plug them back in. When the USB drive is in a Data center that’s a long way to drive just to unplug a drive and plug it back in. For Xenserver try modprobe -r usb_storage […]
Update Managed Antivirus
Here is a script that Updates MAV and resends the DSC information if required. Dim WshShell, oExec, OsType, FSO, bResendDSC, MAVPath, AgentPath Set WshShell = CreateObject(“WScript.Shell”) Set FSO = CreateObject(“Scripting.FileSystemObject”) OsType = WshShell.RegRead(“HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\PROCESSOR_ARCHITECTURE”) If OsType = “x86” then AgentPath = “C:\Program Files\” elseif OsType = “AMD64” then AgentPath = “C:\Program Files (x86)\” end if […]
Restart PC if pending reboot
This script checks if there is any rename operations pending or updates pending and initiates a restart of the computer if required. By running this on demand you can ensure that computers are rebooted only if required,minimizing the effects on users and maximising up time. Dim strComputer Dim strKeyPath Dim strValueName Dim strValue Dim arrValues […]
Teamviewer Settings
Here is a script that will change TeamViewer settings to disable HTTP, Activates DirectIn to stop the dialog, prevents shutdown and stops it from checking for updates. Windows Registry Editor Version 5.00 [HKEY_LOCAL_MACHINE\SOFTWARE\TeamViewer\Version7] “ListenHttp”=dword:00000000 “Security_ActivateDirectIn”=dword:00000001 “Security_Disableshutdown”=dword:00000001 “UpdateCheckInterval”=dword:00000002
Rename Computer
Here is a script to rename the computer Make sure you add /NewName:YourNewComputerName in the script parameters and obviously change it for your naming. Also note that each computer requires a unique name on the network to prevent conflicts so ensure the new name is unique. strComputerName = WScript.Arguments.Named(“NewName”) If strComputerName “” then Set objWMIService […]
Force GroupPolicy Update
Simple script to force group policy updates gpupdate /force
Renew IP address
Simple script to renew the computers ip address ipconfig /release && ipconfig /renew
Reset Local Administrator Password
Simple script to reset the local administrator password. Net User Administrator NEWPASSWORD
Enable RDP Access
Quick script to enable RDP sessions on a computer Taken from Const ENABLE_CONNECTIONS = 1 strComputer = “.” Set objWMIService = GetObject(“winmgmts:” & “{impersonationLevel=impersonate}\\” & strComputer & “\root\cimv2”) Set colItems = objWMIService.ExecQuery(“Select * from Win32_TerminalServiceSetting”) For Each objItem in colItems errResult = objItem.SetAllowTSConnections(ENABLE_CONNECTIONS) Next
Silently Uninstall Software
Here is a handy script I found to uninstall software as an automated task. This will be a lot better when GFI implement a feature to run a script once off. I have modified it to not be case sensitive and also to match contains. This means if you run /Program:adobe reader it will match […]