Что нового

Помогите вырезать последнее слово в строчке

Centrinar

Новичок
Сообщения
100
Репутация
1
Строка hkcu\software\microsoft\winmine нужно только слово winmine. Спасибо!
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
Re: Помогите вырезать помледнее слово в строчке

Centrinar,
Код:
$sText = 'hkcu\software\microsoft\winmine'
$sRes = StringRegExpReplace($sText, '^.*\\', '')
MsgBox(64, 'Info', $sRes)
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4 020
Репутация
622
Re: Помогите вырезать помледнее слово в строчке

Centrinar
перечитывай иногда то, что пишешь, и по возможности исправляй несуразности.
 

VladUs

Скриптер
Сообщения
621
Репутация
180
Re: Помогите вырезать помледнее слово в строчке

Или

Код:
$sStroka = StringSplit("hkcu\software\microsoft\winmine", "\")
MsgBox (64,"info", $sStroka[UBound($sStroka)-1])
 
Автор
C

Centrinar

Новичок
Сообщения
100
Репутация
1
еще маленький вопросик, а как проделать обратную процедуру, удалить последнее слово \winmine
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4 020
Репутация
622
Код:
$sRes = StringRegExpReplace($sText, '\\[^\\]+$', '')



Добавлено:
Сообщение автоматически объединено:

либо без замены
Код:
$sText = 'hkcu\software\microsoft\winmine'
$sRes = StringRegExp($sText, '(.+)\\[^\\]+$', 1)
MsgBox(64, 'Info', $sRes[0])
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8 472
Репутация
2 401
Kaster [?]
либо без замены
Либо без RegExp (чуть быстрее):

Код:
$sText = 'hkcu\software\microsoft\winmine'
$sRes = StringLeft($sText, StringInStr($sText, "\", 2, -1)-1)
MsgBox(64, 'Info', $sRes)


:smile:
 
Верх