Board logo

标题: [文本处理] [已解决]批处理不调用第三方如何找出两行字符串的不同之处/不同字符 [打印本页]

作者: 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

这样算么
  1. @echo off
  2. set "str=C:\D:\E:\F:\G:\Y:\"
  3. :loop
  4. for /f "tokens=1* delims=C:\D:\E:\G:\" %%a in ("%str%") do (
  5.      echo;%%a
  6.      if "%%b" neq "" (set "str=%%b"&goto loop)
  7. )
  8. pause
复制代码

作者: pcl_test    时间: 2016-10-13 18:27

本帖最后由 pcl_test 于 2016-10-13 23:34 编辑
  1. @echo off
  2. set "str1=C:\D:\E:\G:\Z"
  3. set "str2=C:\D:\E:\F:\G:\Y:\"
  4. 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
  5. pause
复制代码
  1. @echo on
  2. rem win7以上系统运行
  3. set "str1=C:\D:\E:\G:\Z"
  4. set "str2=C:\D:\E:\F:\G:\Y:"
  5. powershell -c "('%str2%' -split ''|?{!'%str1%'.contains($_)})+('%str1%' -split ''|?{!'%str2%'.contains($_)})|sort|select -unique"
  6. pause
复制代码

作者: happy886rr    时间: 2016-10-13 20:45

  1. @echo off
  2. REM 待比较字符串
  3. set "Str1=C:\D:\E:\F:\G:\Y:\qo+EjDH6DCwj]j]j]Ajijk63"
  4. set "Str2=C:\D:\E:\G:\G:ko]5hi[5j6H6DC2]9j]j]S"
  5. REM 指针机
  6. setlocal enabledelayedexpansion
  7. for /l %%i in (1,1,1024) do (
  8. set "Cache=!Str1:~%%i,1!"
  9. set "Space=!Space! "
  10. if "!Cache!"=="" (exit)
  11. for %%j in (!Cache!) do (
  12. if "!Str2:%%j=!"=="!Str2!" (
  13. 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
  14. )
  15. )
  16. )
复制代码





欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2