; ИНИ-файл такого содержания:
#cs
[Section1]
1=<тест><архив>
2=<тест><архив>
3=<тест><база>
4=<тест><архив>
[Section2]
1=<тест><база>
2=<тест><архив>
3=<тест><база>
4=<тест><архив>
#ce
$sText=FileRead("Test1.Ini")
MsgBox(0,'$sText',$sText)
$sPattern = '=(.+)'
$aRezult = StringRegExp ( $sText ,$sPattern,3 )
$sPattern = '.+?=(.+<архив>)'
$aRezult1= StringRegExp ( $sText ,$sPattern,3 )
MsgBox(0,'','В ИНИ-файле найдено : ' & @CRLF & "Всего ключей : " & UBound($aRezult) & @CRLF & "Из них ключей, содержаших : <архив> " & UBound($aRezult1))