CAD关于块表得到属性块文本（com接口网页版）

// 构造一个选择集.
var ss = mxOcx.NewSelectionSet();
// 创建一个过滤选择条件.
var spFilte = mxOcx.NewResbuf();
// 把块引用对象，当着过滤条件.
spFilte.AddStringEx("INSERT", 5020);
// 得到图上，所有引用对象.
ss.AllSelect(spFilte);
var  str = "";
// 遍历所有块引用。
for (var i = 0; i < ss.Count; i++)
{
    var ent = ss.Item(i);
    if (ent == null)
        continue;
    if (ent.ObjectName == "McDbBlockReference")
    {
        var blkRef = ent;
        // 遍历属性块的属性。
        for (var j = 0; j < blkRef.AttributeCount; j++)
        {
            // 得到块引用中所有的属性
            var attrib = blkRef.AttributeItem(j);
            str += attrib.TextString + "---";
        }
    }
}
alert(str);