Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно
MKN MKN вне форума

Ветеран


Сообщения: 2355
Благодарности: 557

Профиль | Отправить PM | Цитировать


Задача: "просмотреть" в папке все файлы и записать из них только нужное в другой файл. (соответственно с каждой строкой необходимо произвести манипуляции по нахождению-извлечению нужного)
Скрытый текст

PHP код: Выделить весь код

Var FileCat
Var Name
Var Content
!macro FRead Name Content 
ClearErrors
FileOpen $R5 
"$EXEDIR\data.txt" w
FileOpen $R4 
"$Name" r
${Do} 
FileRead $R4 $Content
${IfThen} ${Errors} ${|} ${ExitDo} ${|}
MessageBox MB_OK "$Content"
FileWrite $R5 "$Name - $Content$\r$\n"
${Loop}
FileClose $R4
FileClose $R5
!macroend

Section
ClearErrors
FindFirst 
$0 $FileCat "$EXEDIR\TEST\*.*"
loop:
  
StrCmp $FileCat "" done
  StrCmp $FileCat 
"." next
  StrCmp $FileCat 
".." next
  StrCpy $Name 
"$EXEDIR\TEST\$FileCat"
 
!insertmacro FRead "$Name" "$Content" 
 
next:
FindNext $0 $FileCat
Goto loop
done
:
FindClose $0
SectionEnd 


Для чтения-записи использую макрос с циклом FileRead. "Проверочный" MessageBox "фиксирует" данные в переменной из каждой строки каждого файла, но записываются данные только из одного файла, либо после обработки строк, вообще нечто рэндомное... В чём здесь ошибка ?

Последний раз редактировалось MKN, 31-10-2023 в 17:58.


Отправлено: 11:47, 31-10-2023 | #2821