[文本处理] 【已解决】批处理删除 某一段代码

lovekix

比如我有一段代码
]通过批处理  能删除吗？  每次都手动查找 然后删除太麻烦

<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App" uap10:TrustLevel="mediumIL" uap10:RuntimeBehavior="windowsApp">
<uap:VisualElements DisplayName="ms-resource:WindowsBackup/Resources/WindowsBackupHostName" Description="ms-resource:WindowsBackup/Resources/WindowsBackupDescription" Square150x150Logo="WindowsBackup\Assets\MedTile.png" Square44x44Logo="WindowsBackup\Assets\AppList.png" BackgroundColor="transparent">
...
</uap:VisualElements>
<Extensions>
<uap:Extension Category="windows.protocol">
<uap:Protocol Name="ms-windowsbackup" ReturnResults="optional"/>
</uap:Extension>
<uap3:Extension Category="windows.appExtension">
<uap3:AppExtension Name="com.microsoft.windows.extensionpackage" Id="WindowsBackup" DisplayName="Extension Metadata">
<uap3:Properties>
<PackageAliases>
<PackageAlias>WindowsBackupAlias</PackageAlias>
</PackageAliases>
</uap3:Properties>
</uap3:AppExtension>
</uap3:Extension>
<uap3:Extension Category="windows.appExtension">
<uap3:AppExtension Name="com.microsoft.windows.app.windowsbackup" Id="WindowsBackup" DisplayName="Extension Metadata"/>
</uap3:Extension>
<uap3:Extension Category="windows.appExtension">
<uap3:AppExtension Name="com.microsoft.windows.extensions.xaml" Id="WindowsBackup" DisplayName="Microsoft Windows Extensions">
<uap3:Properties>
<Classes>
<WindowsBackupControl>WindowsBackup.WindowsBackupControl</WindowsBackupControl>
</Classes>
<MetadataProviders>
<Provider>WindowsBackup.XamlMetaDataProvider</Provider>
</MetadataProviders>
<ResourceDictionaries>
<ResourceDictionary>WindowsBackup.WindowsBackupResources</ResourceDictionary>
</ResourceDictionaries>
</uap3:Properties>
</uap3:AppExtension>
</uap3:Extension>
</Extensions>
<uap:ApplicationContentUriRules>
<uap:Rule Type="include" Match="https://login.live.com/"/>
<uap:Rule Type="include" Match="https://signup.live.com/"/>
<uap:Rule Type="include" Match="https://account.live.com/"/>
</uap:ApplicationContentUriRules>
</Application>
复制代码

terse

回复 37# lovekix
可以将echo %%b改成echo;%%b试一下

另外，要加关键词 第4至8行这样改

set "str3=<Application Id="FESearchUI" Executable="FESearchHost.exe" EntryPoint="CortanaUI.App">"
set "str1=%str1:"=\"%"
set "str2=%str2:"=\"%"
set "str3=%str3:"=\"%"
for /f "delims=:" %%a in ('findstr /ibnrc:"[ 	]*%str1%"   /c:"[ 	]*%str2%"  /c:"[ 	]*%str3%" "appxmanifest.xml"') do set _%%a=1
复制代码

lovekix

回复 36# terse


要是  以后删除第三段  代码 需要怎么弄？

还有 莫名多出  2个   ECHO 处于关闭状态

terse

回复 34# lovekix
PE下没测试，35楼是想是删除两节吗

@echo off
set "str1=<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App" uap10/*[0-9]*:TrustLevel="mediumIL" uap10/*[0-9]*:RuntimeBehavior="windowsApp">"
set "str2=<Application Id="WebExperienceHost" Executable="WebExperienceHostApp.exe" EntryPoint="WebExperienceHostApp.App""
set "str1=%str1:"=\"%"
set "str2=%str2:"=\"%"
for /f "delims=:" %%a in ('findstr /ibnrc:"[ 	]*%str1%"   /c:"[ 	]*%str2%" "appxmanifest.xml"') do set _%%a=1
set "flag="
(for /f "tokens=1* delims=:" %%a in ('findstr /n .* "appxmanifest.xml"') do (
     if defined flag (
           for /f %%i in ("%%b") do  if "%%i" == "</Application>" set "flag="
     ) else if defined _%%a (
           set "flag=1"
     ) else echo %%b
))>new_appxmanifest.xml
pause
复制代码

lovekix

回复 28# 77七


    如果想多删除
<Application Id="WebExperienceHost" Executable="WebExperienceHostApp.exe" EntryPoint="WebExperienceHostApp.App"
这段

需要 怎么弄？

lovekix

回复 33# terse


    PE 下没有cscript。exe 这个文件

terse

回复 32# lovekix
怎么后面跟个v? 将代码里cscript改为cscript.exe试,或者检测一下，

for %%i in (cscript.exe) do echo;文件路径 %%~$PATH:i
复制代码

lovekix

回复 31# terse


    cscript v 不是内部命令

terse

直接删除节点呢 修改把文件名传进去

@set @n=0;/* & echo off & cscript -nologo -e:jscript "%~0" "appxmanifest.xml" "appxmanifest2.xml"&pause & exit  */
var xml = new ActiveXObject("Msxml2.DOMDocument");
xml.load(WScript.Arguments(0));
var node = xml.selectSingleNode("//Application[@Id='WindowsBackup' and @Executable='WindowsBackupClient.exe' and @EntryPoint='WindowsBackup.App']");
if (node != null) {
    node.parentNode.removeChild(node);
}
xml.save(WScript.Arguments(1));
复制代码

77七

回复 29# lovekix


   .*
前面加个.

lovekix

回复 28# 77七

这行代码  可以用* 代替后面的吗？

set "str1=<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App" uap10[/]*[4]*:TrustLevel="mediumIL" uap10[/]*[4]*:RuntimeBehavior="windowsApp">"
复制代码

set "str1=<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App"*>"
复制代码

77七

回复 27# lovekix

@echo off
set "str1=<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App" uap10[/]*[4]*:TrustLevel="mediumIL" uap10[/]*[4]*:RuntimeBehavior="windowsApp">"
set "str2=</Application>"
set "str1=%str1:"="""%"
for /f "tokens=1 delims=:" %%a in ('findstr /nxr /c:"[ 	]*%str1%" "appxmanifest.xml"') do set start=%%a
for /f "tokens=1 delims=:" %%a in ('findstr /nxr /c:"[ 	]*%str2%" "appxmanifest.xml"') do (
	if %%a gtr %start% (
		set end=%%a
		goto :next
	)
)
:next
(for /f "tokens=1* delims=:" %%a in ('findstr /n .* "appxmanifest.xml"') do (
	if %%a lss %start% echo=%%b
	if %%a gtr %end% echo=%%b
))>"appxmanifest-2.xml"
pause
复制代码

lovekix

回复 26# 77七


https://wwrj.lanzouu.com/i461Y1ggo9zc

77七

回复 25# lovekix


   请把出现问题的文件传上来，看看是什么原因。

lovekix

回复 9# 77七


    微软总把 制表符  换成  空格   （有时候 9个   有时候8个）

有时候  还在会把
<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App" uap10:TrustLevel="mediumIL" uap10:RuntimeBehavior="windowsApp">"

替换成
<Application Id="WindowsBackup" Executable="WindowsBackupClient.exe" EntryPoint="WindowsBackup.App" uap10/4:TrustLevel="mediumIL" uap10/4:RuntimeBehavior="windowsApp">"

还有其他办法吗？