windows-server-2003/base/cluster/admin/msclus/wsf/test.wsf

<job id="Cluster Common Properties">

	<reference guid="{f2e606e0-2631-11d1-89f1-00a0c90d061e}" version="1.0" />

	<script language="VBScript">

		Option Explicit

		Dim oCluster
		Dim oProps

		Set oCluster = CreateObject("MSCluster.Cluster")

		oCluster.Open ("galenb-a-clus")

		oCluster.CommonProperties.Item(8).value;
		oCluster.CommonProperties.Item(9).value = x.CommonProperties.Item(9).value;
'		WScript.Echo(oCluster.PrivateProperties.Item(1).name)
		oCluster.PrivateProperties.Item(1).name;
		oCluster.PrivateProperties.Item(2).name;
		oCluster.PrivateProperties.Item(3).name;
		WScript.Echo("Done")

	</script>
</job>