[RegExp] выборка имен принтеров

F9 · 29 Апр 2016

Снова привет.
Продолжаю осваивать RegExp :whistle:

Как из текста (имя принтера) получить только определенные принтеры
например, имеется набор принтеров:

Код:

Имя принтера: Авто EZ2 на ZAKAZ, Имя порта: \\ZAKAZ\EZ2
Имя принтера: Авто BZB на ZAV, Имя порта: \\ZAV\BZB
Имя принтера: Microsoft XPS Document Writer, Имя порта: XPSPort:
Имя принтера: \\KASSA3\HP LaserJet 1022, Имя порта: USB001
Имя принтера: \\ZAKAZ\Zebra LP2824 Plus - ZPL, Имя порта: LPT1:
Имя принтера: \\ZAV\HP LaserJet P2035, Имя порта: USB001

Как мне выбрать только те, имя которых содержит:
BZB, EZ2,EZ-2, Zebra, Zebra LP2824, Zebra2824

inververs · 29 Апр 2016

Alofa · 1 Май 2016

Код:

#include <Array.au3>
$sText = 'Имя принтера: Авто EZ2 на ZAKAZ, Имя порта: \\ZAKAZ\EZ2' & @CRLF & _
		'Имя принтера: Авто BZB на ZAV, Имя порта: \\ZAV\BZB' & @CRLF & _
		'Имя принтера: Microsoft XPS Document Writer, Имя порта: XPSPort:' & @CRLF & _
		'Имя принтера: \\KASSA3\HP LaserJet 1022, Имя порта: USB001' & @CRLF & _
		'Имя принтера: \\ZAKAZ\Zebra LP2824 Plus - ZPL, Имя порта: LPT1:' & @CRLF & _
		'Имя принтера: \\ZAV\HP LaserJet P2035, Имя порта: USB001' & @CRLF & _ 
		'Имя принтера: LaLaLa\EZ-2 Plus, Имя порта: USB001'
		
$asText = StringRegExp($sText, '.+?(?:BZB|EZ2|EZ-2|Zebra).+', 3)
_ArrayDisplay($asText, 'Вариант 1')

F9 сказал(а):
... имя которых содержит:
BZB, EZ2,EZ-2, Zebra, Zebra LP2824, Zebra2824

Имена "Zebra LP2824" и "Zebra2824" не учитываются в поиске, потому что содержат общее слово "Zebra".

F9 · 4 Май 2016

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

#include <Array.au3> $sText = 'Имя принтера: Авто EZ2 на ZAKAZ, Имя порта: \\ZAKAZ\EZ2' & @CRLF & _ 'Имя принтера: Авто BZB на ZAV, Имя порта: \\ZAV\BZB' & @CRLF & _ 'Имя принтера: Microsoft XPS Document Writer, Имя порта: XPSPort:' & @CRLF & _ 'Имя принтера: \\KASSA3\HP LaserJet 1022, Имя порта: USB001' & @CRLF & _ 'Имя принтера: \\ZAKAZ\Zebra LP2824 Plus - ZPL, Имя порта: LPT1:' & @CRLF & _ 'Имя принтера: \\ZAV\HP LaserJet P2035, Имя порта: USB001' & @CRLF & _ 'Имя принтера: LaLaLa\EZ-2 Plus, Имя порта: USB001' $asText = StringRegExp($sText, '.+?(?:BZB|EZ2|EZ-2|Zebra).+', 3) _ArrayDisplay($asText, 'Вариант 1')

F9 сказал(а):

... имя которых содержит:
BZB, EZ2,EZ-2, Zebra, Zebra LP2824, Zebra2824

Нажмите, чтобы раскрыть...

Имена "Zebra LP2824" и "Zebra2824" не учитываются в поиске, потому что содержат общее слово "Zebra".

вывод инфы был в таком виде:

Код:

$strComputer = "."
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Printer")
For $objItem in $colItems
	ConsoleWrite ( "Имя принтера: " & $objItem.Caption & ", Имя порта: " & $objItem.PortName & @CRLF)
Next

Наверно поэтому паттерн

Код:

'.+?(?:BZB|EZ2|EZ-2|Zebra).+'

не выбирает из объекта $objItem.Caption, который содержит

Код:

Microsoft XPS Document Writer
HP LaserJet 5200 Series PCL 5
BZB

Alofa · 4 Май 2016

F9, какой вопрос - такой ответ.
А в вашем случае, вообще лучше делать не так.

F9 · 4 Май 2016

Alofa сказал(а):
F9, какой вопрос - такой ответ.
А в вашем случае, вообще лучше делать не так.

А что не так в моем случае? Поясните, пожалуйста, что имели ввиду

Автор темы	Похожие темы	Форум	Ответы	Дата
S	Некорректная работа StringRegExp	Общие вопросы по AutoIt	2	13 Апр 2022
D	StringRegExpReplace выборка из многих подобных строк одну	Автоматизация IE и Web-интерфейса	7	15 Май 2018
D	[RegExp] Выборка числа в строке (HTML)	Регулярные выражения и прочее	2	9 Июн 2016
	[RegExp] Выборка имени пользователя	Регулярные выражения и прочее	2	28 Мар 2016
F	[RegExp] Выборка из текста	Регулярные выражения и прочее	17	14 Янв 2010

Поиск

Поиск

[RegExp] выборка имен принтеров

F9

Новичок

inververs

AutoIT Гуру

Alofa

Гость

F9

Новичок

Alofa

Гость

F9

Новичок