Visual Basic Script Stuff

Here's a collection of Visual Basic (vb) Script functions I've collected over the years.

Services
   Check if a particular service is running

File System
   Delete a file
   Find a file if it's in the path
   Find the CDROM Drive
   Find CDROM Drive with Media
   Generate a filename and path for a working file in the %temp% directory
   Find the size of a file
   Find the location of PST files and log them in a SQL database

Network
   Renew a DHCP lease
   Ping a host (using WMI)
   Ping a host using the external ping.exe
   Convert an IP Address Mask to Slashed Notation
   Set a static IP address from a text file

Registry
   Search through the registry using recursion

Misc
   Including common functions and statement in your scripts
   Open the Control Panel Dialogue to the "Connections" option
   Convert a Binary File to a String
   Check if you're running on a Desktop or Laptop

Working With Data Files (INI, XML, SQL) files
   Using SQL to Generate a Self Incrementing Computer Naming System
   Read a Value from an INI File (GetINI)
   Write to an INI file (WriteINI)
   Read a whole section of an INI file
   Write a whole section to an INI file
   Read a value from an XML file

LDAP, AD, Exchange etc
   Get User Information from an Exchange 5.5 GAL
   Check to see if a User Account Exists in AD
   Get Members of an AD Group
   Update the Terminal Services Profile Path to point to a new Server
   Set Exchange 'Send As' and 'Receive As' Permissions

Read a value from an XML file

WScript.Echo ReadXMLData("//interestingstuff/myname","c:\\mydatafile.xml")

Function ReadXMLData(xPath,sXMLDataFile)
Dim oXMLDocument
Set oXMLDocument = CreateObject("MSXML.DOMDocument")
oXMLDocument.async = FALSE
oXMLDocument.load(sXMLDataFile)
if Not (oXMLDocument.selectSingleNode(xPath) is Nothing) then
ReadXMLData = oXMLDocument.selectSingleNode(xPath).text
end if
End function

Where your XML file looks something like

<nodes>
<interestingstuff>
    <myname>David</myname>
    <myshoesize>11</myshoesize>
</interestingstuff>
<boringstuff>
    <weather>cold and cloudy</weather>
    <golf>yawn</golf>
</boringstuff>
</nodes>