[Iska]

это ведь несложно организовать, ежели возникнет такая необходимость, например так: »

Ну, вот — можете же .

Но PCRE-совместимые регулярки - вещь в себе, т.е. достаточно универсальны, в основном... Этот момент легко решается с помощью \Z »

Таки да. Добавляем в конец шаблона после символа «\n» символ «?»:

Код:

Option Explicit

Dim strContent


strContent = _
	"192.168.1.101" & vbCrLf & _
	"192.168.1.98" & vbCrLf & _
	"192.168.1.99" & vbCrLf & _
	"192.168.1.100" & vbCrLf & _
	"192.168.1.101" & vbCrLf & _
	"#####192.168.1.101" & vbCrLf & _
	"192.168.1.101#####" & vbCrLf & _
	"#####192.168.1.101#####" & vbCrLf & _
	"192.168.1.102" & vbCrLf & _
	"192.168.1.103" & vbCrLf & _
	"192.168.1.104" & vbCrLf & _
	"192.168.1.101"

WScript.Echo _
	"--- Before: -----------------------------" & vbCrLf & _
	strContent & vbCrLf & _
	"-----------------------------------------" & vbCrLf

With WScript.CreateObject("VBScript.RegExp")
	.Pattern = "^.*192\.168\.1\.101.*$\n?"
	.Global = True
	.MultiLine = True
	
	If .Test(strContent) Then
		strContent = .Replace(strContent, "")
		
		WScript.Echo _
			"--- After: ------------------------------" & vbCrLf & _
			strContent & vbCrLf & _
			"-----------------------------------------" & vbCrLf
	Else
		WScript.Echo "Not found pattern [" & .Pattern & "]."
	End If
End With

WScript.Quit 0

и:

Скрытый текст

Можете взять за основу шаблон из версии для PoSh... »

Напрямую не выйдет, слишком разные возможности в регулярках.

я даю скрипту подстроку произвольного вида. »

Да, к сожалению, в WSH нет такого хорошего средства, как метод Regex.Escape(String) Method (System.Text.RegularExpressions) | Microsoft Docs в .Net.

[YuS_2]

Ну, вот — можете же »

Да тут дело не в умении/не умении, это достаточно простая операция, а потому не очень интересная...

Добавляем в конец шаблона после символа «\n» символ «?»: »

Все же, в этом случае, лучше так:

Код:

[^\n]*192\.168\.1\.101[^\n]*\n?

потому как, в случае чтения текста единым массивом, .* со своей жадностью (особенно в случае (?s) ) может привести к неожиданным результатам, при \n? в конце шаблона.

Напрямую не выйдет, слишком разные возможности в регулярках. »

Это да, вольные и урезанные реализации - зло, но тут и не надо напрямую, просто взять за основу...

[Iska]

потому как, в случае чтения текста единым массивом, .* со своей жадностью (особенно в случае (?s) ) может привести к неожиданным результатам, при \n? в конце шаблона. »

Неа. Там ведь перед \n есть $. То есть, это — «конец строки, за которым сразу может следовать символ конца строки, а может и не следовать», вот такая интересная логика . Разумеется, это справедливо и работает только для установки:

Код:

	.MultiLine = True

когда ^ и $ рассматриваются как «начало строки» и «конец строки», а не «начало текста» и «конец текста».

[YuS_2]

Там ведь перед \n есть $ »

А, ну тоже верно... только это более частный случай, т.е. необходимо учитывать это обязательно.
А это:

Код:

[^\n]*192\.168\.1\.101[^\n]*\n?

будет работать, при любом .MultiLine

[TolikD]

Не по теме: без findstr cmd+js без некошерного создания второго файла, пустые строки сохраняются, всякие непристойные символы сохраняются и не мешают. По сравнению с голым cmd длинный код Удаляем строку, содержащую указанную подстроку Не грубите писателю, он пишет как умеет

Ооо, а вот это именно то, что было нуно, готовое решение прямо таки!