标题: [文本处理] [已解决]批处理不调用第三方如何找出两行字符串的不同之处/不同字符 [打印本页]
作者: 522235677 时间: 2016-10-13 16:16 标题: [已解决]批处理不调用第三方如何找出两行字符串的不同之处/不同字符
本帖最后由 pcl_test 于 2016-10-14 01:40 编辑
比如说 C:\D:\E:\G:\
C:\D:\E:\F:\G:\
这两行,能把F:\给找出来。或者直接找出F也可以的
不要生成临时文件。
作者: pcl_test 时间: 2016-10-13 16:58
这样算么- @echo off
- set "str=C:\D:\E:\F:\G:\Y:\"
- :loop
- for /f "tokens=1* delims=C:\D:\E:\G:\" %%a in ("%str%") do (
- echo;%%a
- if "%%b" neq "" (set "str=%%b"&goto loop)
- )
- pause
复制代码
作者: pcl_test 时间: 2016-10-13 18:27
本帖最后由 pcl_test 于 2016-10-13 23:34 编辑
- @echo off
- set "str1=C:\D:\E:\G:\Z"
- set "str2=C:\D:\E:\F:\G:\Y:\"
- for /f "delims=" %%a in ('mshta "javascript:var a='%str1:\=\\%',b='%str2:\=\\%',n=[],m=[],k=[],s='';for(var i=0;i<a.length;i++)if(!n[a.substr(i,1)])n[a.substr(i,1)]=1;for(var i=0;i<b.length;i++)if(!m[b.substr(i,1)])m[b.substr(i,1)]=1;for(var c in n)if(!m[c])s+=c+'\r\n';for(var d in m)if(!n[d])s+=d+'\r\n';(new ActiveXObject('Scripting.Filesystemobject')).GetStandardStream(1).Write(s);close()"') do echo;%%a
- pause
复制代码
- @echo on
- rem win7以上系统运行
- set "str1=C:\D:\E:\G:\Z"
- set "str2=C:\D:\E:\F:\G:\Y:"
- powershell -c "('%str2%' -split ''|?{!'%str1%'.contains($_)})+('%str1%' -split ''|?{!'%str2%'.contains($_)})|sort|select -unique"
- pause
复制代码
作者: happy886rr 时间: 2016-10-13 20:45
- @echo off
- REM 待比较字符串
- set "Str1=C:\D:\E:\F:\G:\Y:\qo+EjDH6DCwj]j]j]Ajijk63"
- set "Str2=C:\D:\E:\G:\G:ko]5hi[5j6H6DC2]9j]j]S"
-
- REM 指针机
- setlocal enabledelayedexpansion
- for /l %%i in (1,1,1024) do (
- set "Cache=!Str1:~%%i,1!"
- set "Space=!Space! "
- if "!Cache!"=="" (exit)
- for %%j in (!Cache!) do (
- if "!Str2:%%j=!"=="!Str2!" (
- echo !Str1!&echo !Space!↑&echo !Str2!&echo !Space!↑&echo !Space:~6!Looking this!&(for /l %%n in (1,1,20) do (ping -n 1 127.1>NUL))&cls
- )
- )
- )
复制代码
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |