Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: OlegEk
нет, не проще
Общая задача: задача разобраться с регулярками
Частная задача одним действием привести строку к надлежащему виду

Вот пример:
есть строка вида
"Подстрока без двоеточия, будем считать что заголовок
название параметра1:значение параметра1
название параметра2:значение параметра3
название параметра3:значение параметра3"

Мне надо отформатировать её для выгрузки в HTML. Притом так, чтобы заголовок был просто исключен, а остальное было бы подготовлено для вставки в HTML таблицу

строки с параметрами с помощью регулярки разбираются элементарно:

s1= "<t r><t d>"
s2="</t d><t d>"
s3="</t d></t r>"
objRegExp.Pattern = "( . * ) : ( . * ) "
cSource = objRegExp.replace(cSource, s1 & "$1" & s2 & "$2" & s3) 


И логично этой же регуляркой исключить заголовки. То есть по сути это должна сделать вот такая конструкция

objRegExp.Pattern = "( . * [ ^ : ] . * ) "
'   или например objRegExp.Pattern = "( . * [ : ]{0} . * ) "
cSource = objRegExp.replace(cSource, "") 


То есть на выходе должно получиться

"<t r><t d>название параметра1</t d><t d>значение параметра3</t d></t r>
<t r><t d>название параметра2</t d><t d>значение параметра3</t d></t r>
<t r><t d>название параметра3</t d><t d>значение параметра3</t d></t r>"

И не надо сплитить строку на подстроки
Однако именно исключающее условие не срабатывает

2 Силblч
попробовал, не ловится :(


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.