Zinc ошибка VBScript

[Agent007]

Здравствуйте, подскажите плиз почему выдает ошибку "800A01C2". Непонимаю, вродебы все правильно сделал.

vbCode = 'Sub Indesig()\r';
   vbCode += 'Set myInDesign = CreateObject("InDesign.Application.CS3")\r';
   vbCode += 'Set myDocument = myInDesign.activeDocument\r';
   vbCode += 'myDocument.ImportXML "c:\Sasha\Flash\Zinc\01\BASA\New\temp.xml"\r';
   vbCode += 'myInDesign.ActiveDocument.Save\r';
   vbCode += 'myInDesign.ActiveDocument.Close\r';
   vbCode += 'End Sub\r';
   mdm.System.VBScript.execute(vbCode, 'Indesig', "", "", "", "", "");