Browse by Tags

VBS Script To Cancel All Active Print Jobs On A Local Machine

This By Request Vbs script will cancel all of the active print jobs on the computer from which the script is executed on. VBS Script: strComputer = "LocalHost" Set objWMIService = GetObject( "winmgmts:\\" & strComputer & "\root\cimv2" ) Set colItems = objWMIService...

Posted to Don Hite (Weblog) by dhite on 01-27-2008
Filed under: By Request
By Request Script To Show How Many Days Are Left In The Year

This VBS script will echo back the Day number of the year and how many days are remaining or left in the year. VBS Script: DateTime = Date MsgBox "Today Is Day Number: " & (Day( Date )) MsgBox "There Are " & DateDiff( "D" , DateTime, #1/1/2009#) & " Days...

Posted to Don Hite (Weblog) by dhite on 01-20-2008
Filed under: By Request
By Request VBS Script To Retrieve A Remote Machines Time Zone Name

This VBS script will allow you to enter a remote machine name into an input dialog box and will return the specified machines Daylight (DST) and Standard time zone setting. VBS Script: strComputer = InputBox ( "Enter Machine Name" ) Set objWMIService = GetObject( "winmgmts:\\" &...

Posted to Don Hite (Weblog) by dhite on 12-30-2007
Filed under: By Request
By Request Script To List Home Share Files Accessed Today

This By Request script is a script that I was asked to modify to use “Today” as a date instead of a hard coded date such as 12-25-07. VBS Script: dtDate = Now() strSearchFolder = "H:\" Set objFSO = CreateObject( "Scripting.FileSystemObject" ) MsgBox "File(s) last...

Posted to Don Hite (Weblog) by dhite on 12-23-2007
Filed under: By Request
By Request VBS Script To Count Items From A WMI Class

Here you will find two VBS script to show you how to count specified WMI class items. The first VBS script will count and display the number of services that are stopped and then will count and display the number of services that are started. The second VBS script will allow you to enter an SMS site...

Posted to Don Hite (Weblog) by dhite on 12-16-2007
Filed under: By Request
By Request Script To Retrieve WMI Information For A Remote Machine

This By Request VBS script will allow you to enter a remote machine name and will then retrieve the machines WMI information including its WMI ersion, Database directory, Installation directory, Logs directory and its Maximum log file size limitation. VBS Script: strComputer = InputBox ( "Enter...

Posted to Don Hite (Weblog) by dhite on 12-09-2007
Filed under: By Request
By Request Script To Verify If Outlook Pst Files Are Stored On A Remote Machine

Question: Users are to have Outlook files on their home disk and not on their PC. Can you show a script how to see if the file is on the PC. Then we want to know where it is. - Kahdir S Reply: There are several ways to do this using the Cimv2 CIM_Datafile class. The script here will allow you to enter...

Posted to Don Hite (Weblog) by dhite on 12-02-2007
Filed under: By Request
By Request VBS Script To Return A Remote Machines Operating System And Version

This By Request VBS script will retrieve a remote machines operating system version or Caption name and display the Machine name and Caption on the same message box line. VBS Script: strComputer = InputBox ( "Enter Machine Name" ) Set objWMIService = GetObject( "winmgmts:\\" &...

Posted to Don Hite (Weblog) by dhite on 11-25-2007
Filed under: By Request
By Request VBS Script To List All Vista Machines In Active Directory

This By Request VBS script will allow you to enter an Active Directory (AD) domain name into an input dialog box and will search AD for all machines that have Windows Vista installed as detected in AD. VBS Script: strDomain = InputBox ( "Enter Domain Name" ) strNosVersion = "6.0 (6000...

Posted to Don Hite (Weblog) by dhite on 11-18-2007
Filed under: By Request
By Request VBS Script To Retrieve A Remote Workstations Group Policies

This by request VBS script will allow you to enter a remote workstation name and will return the Group Policy (GPO) objects in use for the machine. VBS Script: On Error Resume Next strComputer = InputBox ( "Enter Workstation Name" ) Set objWMIService = GetObject( "winmgmts:\\" &...

Posted to Don Hite (Weblog) by dhite on 11-11-2007
Filed under: By Request

Page 1 of 13 (125 items) 1 2 3 4 5 Next > ... Last »