Vista - CreateTaskSetPropertiesandAddtoJob.vbs

Hi,

I found this script in the Technet script repoitory. It does not work.

strClusterName = "localhost" 'Change to name of cluster if not run
locally.
strCommandLine = "mpiexec icpi"
strUsername = "" 'If empty string, script prompts for username.
strPassword = "" 'If empty string, script prompts for password.
blnIsConsole = True 'True = cmd-line, False = GUI
intHandle = 0
Set objComputeCluster =
CreateObject("Microsoft.ComputeCluster.Cluster")
objComputeCluster.Connect(strClusterName)
WScript.Echo "Compute Cluster Name: " & objComputeCluster.Name
Set objJob = objComputeCluster.CreateJob
intJobID = objComputeCluster.AddJob((objJob))
WScript.Echo "Job ID: " & intJobID
Set objTask = objComputeCluster.CreateTask
objTask.CommandLine = strCommandLine
intTaskID = objComputeCluster.AddTask(objJob.ID, (objTask))
WScript.Echo "Task ID: " & objTask.ID
objComputeCluster.SubmitJob intJobID, strUsername, strPassword, _
blnIsConsole, intHandle
WScript.Echo "Submitted Job " & intJobID


After some work I found that this:

Set objComputeCluster =
CreateObject("Microsoft.ComputeCluster.Cluster")

probably should be this: Set objComputeCluster =
CreateObject("MSCluster.Cluster")

And this Set objJob = objComputeCluster.CreateJob does not work.

How do I find out what the properties of ("MSCluster.Cluster") are?

OldDog