[Iska]

Freddy1984, давайте начнём как обычно — Вы упакуете файл в архив и приложите к сообщению.

[Freddy1984]

Вы упакуете файл в архив и приложите к сообщению. »

прикрепил

[Iska]

Freddy1984, так может лучше и искать и удалять именно строку с «SetREV=»?

[Freddy1984]

так может лучше и искать и удалять именно строку с «SetREV=»? »

в том то и дело что нет, в моём случае так не выйдет, так как SetREV= лишний ТОЛЬКО перед VER:1.10.50=
Во всех остальных случаях эти SetREV= не трогать. Так как в этом же текстовом файле есть и другие позиции, при которых должно быть присутствие SetREV=

[megaloman]

Freddy1984,

VBS. Путь укажИте свой

Код:

FileIn = "Z:\Box_Arc\файл\цель.txt"

RegExp = Chr(13) + "?" + Chr(10) + "?" + ".*SetREV=.*" + Chr(13) + "?" + Chr(10) + "?" + "VER:1\.10\.50="
Rep = Chr(13) + Chr(10) + "VER:1.10.50="

With CreateObject("Scripting.FileSystemObject")
    On Error Resume Next
    With .OpenTextFile(FileIn, 1)
        If Err.Number <> 0 Then
            MsgBox "Error open file " + vbCrLf + vbCrLf + FileIn + vbCrLf + vbCrLf + "Err.Number " + CStr(Err.Number) + vbCrLf + Err.Description
            WScript.Quit 1
        End If
        InTxt = .ReadAll
        If Err.Number <> 0 Then
            MsgBox "Error read file " + vbCrLf + vbCrLf + FileIn + vbCrLf + vbCrLf + "Err.Number " + CStr(Err.Number) + vbCrLf + Err.Description
            WScript.Quit 1
        End If
        .Close
        On Error GoTo 0
    End With
            
    With CreateObject("VBScript.RegExp")
        .Pattern = RegExp
        .IgnoreCase = True
        .Global = True
    If Not .Test(InTxt) Then
            MsgBox "no substrings to replace. Reg expression:" + vbCrLf + vbCrLf + """" + RegExp + """"
            WScript.Quit 1
    End If
        Result = .Replace(InTxt, Rep)
    End With
    
    With .CreateTextFile(FileIn, True)
        .Write Result
        .Close
    End With
    
End With

[Freddy1984]

VBS. »

Я благодарю Вас. А может вы в курсе как на powershell это сделать?

[YuS_2]

Надо во всём txt файле найти и удалить одну предыдущую строку перед VER:1.10.50=(значение меняется) »

как на powershell это сделать? »

Допустим, что предыдущая строка, это set REV=(значение меняется), тогда код можно написать так:

Код:

(gc 'цель.txt' -enc utf8 -raw) -replace 'SetREV[^\n]*\n(?=VER:1\.10\.50=)'|
out-file 'результат.txt' -enc utf8

Если же, предыдущая строка, это любой текст, тогда шаблон регэкспа необходимо будет исправить на такой:

Код:

(gc 'цель.txt' -enc utf8 -raw) -replace '(?<=^|\n)[^\n]+\n(?=VER:1\.10\.50=)'|
out-file 'результат.txt' -enc utf8

[greg zakharov]

С помощью sed:

Код:

sed -i "/set rev=.*/Id" input.txt

С помощью pwsh:

Код:

(sls 'set rev=.*' -notmatch .\input.txt).line

[Freddy1984]

Если же, предыдущая строка, это любой текст, тогда шаблон регэкспа необходимо будет исправить на такой: »

Супер! Вопрос закрыт.