Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

31 Май 2020, 12:55 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Часто задаваемые вопросы по LibreOffice и Apache OpenOffice.org
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: Формируется документ из шаблона ODT . В версии 3.3 нижепри...  (Прочитано 3317 раз)
0 Пользователей и 1 Гость смотрят эту тему.
ForumOOo (бот)

Offline Offline

Сообщений: 728


« Стартовое сообщение: 9 Октябрь 2014, 14:39 »

Компонент: Writer
Версия продукта: 4.1.x
Сборка: Apache OpenOffice
ОС: windows XP

Формируется документ из шаблона ODT . В версии 3.3 нижеприведенный код
работает без проблем, а в версии 4.1 документ открывается , но
макроподстановки не выполняются. В чем проблема ?

Если это файл ОпенОфис
if UCase(right(sFileFrom,3)) = "ODT" or UCase(right(sFileFrom,3)) =
"ODS" then
  'Переделать путь к формируемому файлу под стандарт ОО
  sFileTo = "file:///"+replace(sFileTo,"\","/")
  sFileSrc = "file:///"+replace(sFileSrc,"\","/")

  'Открытие файла
  Dim NoArg()
  Dim oServiceManager
  Dim oDesktop
  Dim oDocument
  set oServiceManager = CreateObject("com.sun.star.ServiceManager")
  set oDesktop =
oServiceManager.createInstance("com.sun.star.frame.Desktop")
  set oDocument = oDesktop.loadComponentFromURL("file:///"+sFileFrom,
"_blank", 0, NoArg)

  'Запуск макроса (macro://./Standard.ReplaceValue.ReplaceValue)
  Dim oDispatcher
  set oDispatcher =
oServiceManager.createInstance("com.sun.star.frame.DispatchHelper")
  Call oDispatcher.executeDispatch(oDesktop,
sMacroName+"("""+sFileSrc+""","""+sFileTo+""")", "", 0, NoArg)
end if


--
Подпись: Андрей
Записан
Yakov
Администратор
**
Offline Offline

Сообщений: 2 518


WWW
« Ответ #1: 10 Октябрь 2014, 11:09 »

Запуск макроса (macro://./Standard.ReplaceValue.ReplaceValue)
Проверьте наличие этой библиотеки в вашей версии 4.1
Записан

arz_ven
Новичок
*
Offline Offline

Сообщений: 2


« Ответ #2: 10 Октябрь 2014, 13:57 »

Проверьте наличие этой библиотеки в вашей версии 4.1
Это макрос в документе шаблоне. Standard.dll нет ни в одном office
Записан
Hasim
Форумчанин
***
Offline Offline

Сообщений: 754

Woe from wit


« Ответ #3: 10 Октябрь 2014, 14:41 »

Файл в студию!
Записан
Yakov
Администратор
**
Offline Offline

Сообщений: 2 518


WWW
« Ответ #4: 10 Октябрь 2014, 15:04 »

Помимо шаблона, макрос может быть в библиотеке "Мои макросы"
Поэтому, проверьте нет ли в вашей установке версии 3.3 макросов в библиотеке  "Мои макросы" / Standard
« Последнее редактирование: 10 Октябрь 2014, 15:07 от Yakov » Записан

arz_ven
Новичок
*
Offline Offline

Сообщений: 2


« Ответ #5: 13 Октябрь 2014, 13:19 »

Спасибо Всем за участие.
  Имеем файл шаблона sss.odt. в результате работы программы формируется файл с переменными sss.txt. По выше указанному коду файл  sss.odt заполняется переменными из sss.txt.  файлы взял рабочие, только несколько урезал для простоты.
 

* sss.TXT (3.98 Кб - загружено 32 раз.)
* sss.ODT (18.69 Кб - загружено 32 раз.)
Записан
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!