[Процессы] Как считать текст из файла а затем перепечатать его

[VermanVendetta13]

Привет всем. Возник такой вопрос.
Какой код может считать текстовый файл в формате doc, а затем перепечатать его в одну строчку в блокноте?

Надеюсь на помощь :IL_AutoIt_1:

 

[inververs]

_Word_DocSaveAs

сохранить как txt

 

[VermanVendetta13]

_Word_DocSaveAs

сохранить как txt

Это конечно так, но всё же текст сохранится как есть, а нужно что бы он перепечатался в одну строчку

 

[inververs]

Можно переоткрыть и удалить все переносы строк. Но лучше конечно найти метод, который считывает текст из документа.

 

[alex33]

Можно так. Вот написал рабочий пример.
Прокомментировал код чтобы было понятно

#include <Word.au3> ; подключаем библиотеку
$oWord = _Word_Create(); открываем Word
$oDoc = _Word_DocOpen($oWord, @ScriptDir & "\123tst123.docx"); открываем документ
_Word_DocSaveAs($oDoc, @ScriptDir & "\DTest.txt", 2); сохранить как, сохраняем под указанным именем
_Word_Quit($oWord); закрываем Word

$hFile = FileOpen(@ScriptDir & "\DTest.txt", 0); открываем только что созданный текстовый файл для чтения
$sText = FileRead($hFile); читаем текст в переменную
FileClose($hFile); закрываем файл
$sText = StringRegExpReplace($sText, "[\r\n]", " "); заменить переводы строк на пробел
$hFile = FileOpen(@ScriptDir & "\DTest.txt", 2); открываем файл для записи
FileWrite($hFile, $sText); переписываем в него текст в одну строку
FileClose($hFile); закрываем файл