Конверторы
Word позволяет работать с документами, подготовленными не только в более ранних его версиях, но и в других текстовых редакторах. Для этого используются конверторы файлов. Коллекция объектов FileConverters позволяет выбрать тот или конвертор. У коллекции нет методов Add и Delete, поэтому добавлять новые конверторы или удалять ненужные конверторы программно нельзя. Это делается в процессе инсталляции Office 2000. В следующем примере печатаются имена конверторов, доступных на моей машине и анализируются некоторые их свойства:
Public Sub ConvertDoc() 'Работа с конвертором Dim conv As FileConverter Debug.Print Application.FileConverters.Count For Each conv In Application.FileConverters Debug.Print conv.Name, conv.FormatName, conv.ClassName If conv.CanOpen And conv.CanSave Then Debug.Print "Конвертор может открывать и сохранять файлы" End If Next conv End Sub
Листинг 1.20.
(html, txt)
Приведем результаты работы этой процедуры. Нет смысла приводить полный список всех 26 доступных конверторов, поэтому мы ограничимся несколькими строчками:
26 Text with Layout Text with Layout Конвертор может открывать и сохранять файлы MS-DOS Text with Layout MS-DOS Text with Layout Конвертор может открывать и сохранять файлы WordPerfect 5.x for Windows WrdPrfctWin WordPerfect 5.1 for DOS WrdPrfctDOS51
Листинг 1.21.
(html, txt)
