ActiveX Server Error in 2013 and 2014 VLA-ADD

[donbutler]

The following snippet works in 2012 but fails in 2013 and 2014

(if layer
        (progn
             (setq lays (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))))
                (if (vl-catch-all-error-p
                      (setq objlay (vl-catch-all-apply 'vla-item (list lays layer)))
                    )
                  (setq objlay (vla-add lays layer))
                )
        )
        (setq objlay (vla-get-activelayer (vla-get-activedocument (vlax-get-acad-object))))
   )

This line ...

(setq objlay (vla-add lays layer))

Returns:

error: ActiveX Server returned an error: Library not registered

Anyone have an idea what's wrong?

Thanks

[donbutler]

It looks like the error is coming up in other locations too. I'll keep digging.

[AlessiMarc'Antonio]

Works for me in 2013 sp1:

Comando: (setq lays (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))))
#<VLA-OBJECT IAcadLayers 0000000028533888>

Comando: (setq objlay (vla-add lays "NEWLAYER"))
#<VLA-OBJECT IAcadLayer 0000000028534de8>

[chicodon]

Thanks. I had uninstalled AutoDesk 360 and something happened. I reinstalled AutoCad 2014 and now everything is working. Thanks for your input.

Don Butler