Проблема различия кодировок txt и docx при переносе текста из одного файла в другой

@ominami · Регистрация: 05.05.2022

Студворк — интернет-сервис помощи студентам

При реализации конвертера из txt в docx, получаемый файл "повреждён", и ворд отказывается его открывать. Если же наоборот из docx в txt, то появляются символы, совсем не похожие на русские буквы. Это натолкнуло на мысль, что проблема в различии методов кодировок txt и docx. Помогите, пожалуйста, решить данную проблему.

Visual Basic
1
2
3
4
5
6
7
8
9
10
files(0) = FreeFile()
FileOpen(files(0), filepath, OpenMode.Input)
files(1) = FreeFile()
FileOpen(files(1), newfile, OpenMode.Output)
Do While Not EOF(files(0))
     memory = LineInput(files(0))
     PrintLine(files(1), memory)
Loop
FileClose(files(0))
FileClose(files(1))

@OwenGlendower · 06.05.2022, 00:41

ominami, docx файл это zip архив с xml файлами внутри. Соответственно работать с ним как с текстовым файлом не получится.

@ominami · 06.05.2022, 08:57 **[ТС]**

А как тогда работать с ним?

I can · 06.05.2022, 09:21

Можно через объект Word

Добавлено через 22 минуты
Простой пример

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Command1_Click()
    On Error GoTo m
    Dim ff As Long, w As Object, d As Object
    ff = FreeFile
    Open App.Path & "\1.txt" For Input As #ff
    Set w = CreateObject("Word.Application")
    Set d = w.Documents.Add
    d.Select
    d.Application.Selection.TypeText Input(LOF(ff), #ff)
    d.saveas App.Path & "\1.docx"
    d.Close
    w.Quit
    Close #ff
    MsgBox "OK"
Exit Sub
m:
    MsgBox Err.Description
End Sub

I can · 06.05.2022, 19:39

ominami, ну как?

@ominami · 14.05.2022, 15:52 **[ТС]**

Я устроил танцы с бубном: сначала перевел в риф а потом из него в док

Добавлено через 15 секунд
Rtf*

Новые блоги и статьи Все статьи Все блоги /
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .

@OwenGlendower Администратор 18298 / 14222 / 5368 Регистрация: 17.03.2014 Сообщений: 28,900 Записей в блоге: 1
	06.05.2022, 00:41
	ominami, docx файл это zip архив с xml файлами внутри. Соответственно работать с ним как с текстовым файлом не получится. 2

@ominami 0 / 0 / 0 Регистрация: 05.05.2022 Сообщений: 8
	06.05.2022, 08:57 [ТС]
	А как тогда работать с ним? 0

I can fly 4955 / 4646 / 844 Регистрация: 13.04.2015 Сообщений: 9,841
	06.05.2022, 19:39
	ominami, ну как? 0

@ominami 0 / 0 / 0 Регистрация: 05.05.2022 Сообщений: 8
	14.05.2022, 15:52 [ТС]
	Я устроил танцы с бубном: сначала перевел в риф а потом из него в док Добавлено через 15 секунд Rtf* 0