This is a sample script that will allow you to find all items that do not have good quality and write them to an array.
- Author: Joseph Hefner
- Published: 12/17/2015
- Applies to: Application Server 3.1 and later
You can use the script below to capture items in a ddesuitelink object and write them to an array called NotGoodQuality.
Dim attr as String;
dim x as indirect;
dim I as integer;
For Each attr In Me._Attributes
x.BindTo("Me." + attr + ".quality");
If x <> "192" then
I= I +1;
Me.NotGoodQuality[I] = attr;