Показать сообщение отдельно
Старый 09.04.2008, 10:34
Agent007 вне форума Посмотреть профиль Отправить личное сообщение для Agent007 Найти все сообщения от Agent007
  № 1  
Ответить с цитированием
Agent007

Регистрация: May 2006
Сообщений: 33
По умолчанию Zinc ошибка VBScript

Здравствуйте, подскажите плиз почему выдает ошибку "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', "", "", "", "", "");