Что нового

[Данные, строки] убрать знак конца строки

ZeVSalt

Я не лупоглазый, это прищур такой !
Сообщения
136
Репутация
0
Здравствуйте господа.
Имеется строка:

Суммарная информация,,Компьютер,515,Имя пользователя,Иванов ИИ

после применения функции:
Код:
Func UserName ($ADDR)
$FileOpen = FileOpen($ADDR)
$text = FileRead ($FileOpen)
$Pattern = '(?i)(?m)(Имя пользователя.*)'
$Result = StringRegExp ($text, $Pattern, 3)
$space = StringStripWS ($Result[0], 4)
$Replace = 'Имя пользователя,'
$ParsUser = StringReplace ($space,$Replace, "")
FileClose ($FileOpen)
Return $ParsUser
 EndFunc

парсится и знак конца строки, как его правильно убрать?
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,321
ZeVSalt,
Можно так.
Код:
$sStr = 'Суммарная информация,,Компьютер,515,Имя пользователя,Иванов ИИ' & @CRLF

$sRes = StringRegExpReplace($sStr, '.*Имя пользователя,(.+[^\r\n])[\r\n]*.*', '$1')
ConsoleWrite(@extended & @TAB & '>' & $sRes & '<' & @LF)
 
Автор
ZeVSalt

ZeVSalt

Я не лупоглазый, это прищур такой !
Сообщения
136
Репутация
0
спасибо, работает.
 
Верх