You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
18 lines
485 B
18 lines
485 B
Option Explicit
|
|
|
|
Dim oCluster
|
|
Dim oProps
|
|
dim oValue
|
|
|
|
Set oCluster = CreateObject("MSCluster.Cluster")
|
|
|
|
oCluster.Open ("galenb-a-clus")
|
|
|
|
oValue = oCluster.CommonProperties.Item(8).Value
|
|
oCluster.CommonProperties.Item(9).Value = oCluster.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")
|
|
|