VBScript to enumerate SQL Cluster information?

I am trying to create a WScript to enumerate certain information from the SQL Cluster, including:

• Cluster name
• Node names
• Which node is active
• The local SQL Server service that is part of the node (e.g., MSSQLSERVER, MSSQL$BACKOFFICE, etc)
• The volume name for the shared drive/volume

I have found scripts to add clusters, and C# programs to enumerate cluster information, but so far have not been successful in creating a simple enumeration script.

I thought this would be an easy one but it is turning out to be trickier than I thought.

Thanks for any guidance.