Удаление секции в *.ini файле

seriousstas · 2 Май 2018

Версия AutoIt: 3.3.12.0
Описание:
Подскажите Резулярное выражение для :

Примечания:

Код:

строка x
строка x
и тд
/--------------------Start FOOBAR Control----------------------- 
Строка x
Строка x
и тд
/--------------------End FOOBAR Control----------------------- 
Строка x
Строка x
и тд

x - переменная . Те - строки меняют содержимое или могут отсутствовать.
Нужно оставить все, что выше и ниже ...FOOBAR Control , остальное (эти строки и содержимое секци) - удалить
файл называется UserExecTBL.ini
С чтением - записью - разобрался .
На рерулярном - затык.

sngr · 2 Май 2018

Код:

IniDelete

seriousstas · 2 Май 2018

sngr сказал(а):
Код:

IniDelete

Примечания

Стандартный ini-файл имеет следующую структуру:
[Имя секции]
Параметр=Значение

Спасибо, но обратите внимание - это не стандартный ini файл (Файл содержит меняющийся текст, а секция начинается и заканчивается так, как показано выше ) .

gunter123 · 2 Май 2018

Как-то так

Код:

$sStr = FileRead('UserExecTBL.ini')

$sStr = StringRegExpReplace($sStr, '(?s)(/[-]+Start FOOBAR Control[-]+ .+?/[-]+End FOOBAR Control[-]+)', '')
FileOpen('UserExecTBL.ini', 2)
FileWrite('UserExecTBL.ini', $sStr)

seriousstas · 3 Май 2018

gunter123 сказал(а):
Как-то так

Код:

$sStr = FileRead('UserExecTBL.ini') $sStr = StringRegExpReplace($sStr, '(?s)(/[-]+Start FOOBAR Control[-]+ .+?/[-]+End FOOBAR Control[-]+)', '') FileOpen('UserExecTBL.ini', 2) FileWrite('UserExecTBL.ini', $sStr)

Живой пример

Код:

/-------------------------------------------------------------------------------------
/----------------------------  Запись скриптов управления мышкой ---------------------
/-------------------------------------------------------------------------------------

"ShowStartFlash","Load;StartFlash.skin||StartTimer;_StartFlash_;$StartFlashTime$"
"on_StartFlash_timer","EndTimer;_StartFlash_||if;strcomp($SaveStateStatus$;0);{StartTimer;AutoLoadstart;$AutoLoadstartTime$};{BYVAR;MyApp1_AutoSaveState;{OnAutoSave1Timer}<<{MyApp1||StartTimer;AutoSave1;$AvtoLoadScreenTime$}}"
/-------------------------------------------------------------
/--------------------Start FOOBAR Control-----------------------
/-------------------------------------------------------------
//Управление плей листом.
"foobar_removeplaylist","RUNW;$foobar_exe$|/command:"remove playlist""
"foobar_renameplaylist","RUNW;$foobar_exe$|/command:"rename playlist""
"foobar_newplaylist","RUNW;$foobar_exe$|/"command:new playlist""
"foobar_loadplaylist","RUNW;$foobar_exe$|/command:"load playlist...""
"foobar_playnextplaylist","RUNW;$foobar_exe$|/command:"play next playlist""
"foobar_previousplaylist","RUNW;$foobar_exe$|/command:"previous playlist""
"foobar_saveplaylist","RUNW;$foobar_exe$|/command:"save playlist...""
"foobar_clearplaylist","RUNW;$foobar_exe$|/command:clear"

/-------------------------------------------------------------
/--------------------End FOOBAR Control-----------------------
/-------------------------------------------------------------
/ ------------------ OBD плагин ------------------------------

Должно примерно остаться (БЛОКИ FOOBAR Control МОГУТ ДУБЛИРОВАТЬСЯ - В ИДЕАЛЕ - СНЕСТИ ВСЕ)

Код:

/-------------------------------------------------------------------------------------
/----------------------------  Запись скриптов управления мышкой ---------------------
/-------------------------------------------------------------------------------------

"ShowStartFlash","Load;StartFlash.skin||StartTimer;_StartFlash_;$StartFlashTime$"
"on_StartFlash_timer","EndTimer;_StartFlash_||if;strcomp($SaveStateStatus$;0);{StartTimer;AutoLoadstart;$AutoLoadstartTime$};{BYVAR;MyApp1_AutoSaveState;{OnAutoSave1Timer}<<{MyApp1||StartTimer;AutoSave1;$AvtoLoadScreenTime$}}"
/-------------------------------------------------------------

/-------------------------------------------------------------
/ ------------------ OBD плагин ------------------------------

Пробую Ваш пример не работает, такой - все обнуляет :

Код:

$hFile = FileOpen(@ScriptDir & '\UserExecTBL.ini',2)
$sChars = FileRead($hFile)
$sStr = StringRegExpReplace($sChars, '(?s)(/[-]+Start FOOBAR Control[-]+ .+?/[-]+End FOOBAR Control[-]+)', '')
FileWrite($sChars, $sStr)

gunter123 · 3 Май 2018

Эта строка открывает файл, удалив его содержимое, поэтому лучше вставить ее прямо перед записью нового содержимого, как в моем примере

Код:

$hFile = FileOpen(@ScriptDir & '\UserExecTBL.ini',2)

Вот этот шаблон также удалит также строки /----- выше и ниже секции

Код:

$sStr = StringRegExpReplace($sStr, '(?s)(/[^/]+/[- ]+Start FOOBAR Control[- ]+.*?/[- ]+End FOOBAR Control[- ]+[^/]*/[-]+)', '')

seriousstas · 3 Май 2018

gunter123 сказал(а):
Эта строка открывает файл, удалив его содержимое, поэтому лучше вставить ее прямо перед записью нового содержимого, как в моем примере

Код:

$hFile = FileOpen(@ScriptDir & '\UserExecTBL.ini',2)

Вот этот шаблон также удалит также строки /----- выше и ниже секции

Код:

$sStr = StringRegExpReplace($sStr, '(?s)(/[^/]+/[- ]+Start FOOBAR Control[- ]+.*?/[- ]+End FOOBAR Control[- ]+[^/]*/[-]+)', '')

Релиз)) :beer: :

Код:

$file = @ScriptDir & '\UserExecTBL.ini'
$sChars = FileRead($file)
$sStr = StringRegExpReplace($sChars, '(?s)(/[^/]+/[- ]+Start FOOBAR Control[- ]+.*?/[- ]+End FOOBAR Control[- ]+[^/]*/[-]+)', '')
$hFile = FileOpen($file,2)
FileWrite($hFile, $sStr)

Спасибо Большое!

Автор темы	Похожие темы	Форум	Ответы	Дата
P	Удаление всех строк между двумя известными	Общие вопросы по AutoIt	2	18 Дек 2023
D	Автоматическое копирование и удаление файлов, папок, по расписанию	Примеры и рабочие проекты	4	8 Сен 2023
D	Быстрое удаление элементов массива	Примеры и рабочие проекты	3	19 Май 2023
O	Самоудаление скрипта	Общие вопросы по AutoIt	3	13 Май 2021
	Автоматизация Удаление папки после закрытия окна (GUICreate)	Общие вопросы по AutoIt	4	8 Апр 2021

Поиск

Поиск

Удаление секции в *.ini файле

seriousstas

Новичок

sngr

AutoIT Гуру

seriousstas

Новичок

gunter123

Продвинутый

seriousstas

Новичок

gunter123

Продвинутый

seriousstas

Новичок