[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 15# 881966

不提供出错信息,又不提供样本,让大家怎么帮你解决问题?你认为的“复制文本”就行,根本不是你想的那样,我既然发出来代码,能测试的我都测试过了,使用正常的
bat小白,请多指教!谢谢!

TOP

本帖最后由 881966 于 2023-2-18 20:04 编辑

回复 16# 77七


    链接:https://pan.baidu.com/s/1hBw23ogZBNkwqplvrWr60g
提取码:1234

用14楼的代码

TOP

链接:https://pan.baidu.com/s/1W2FliVB36ZhutCqVA56G0g
提取码:1234

这是5楼代码

TOP

链接:https://pan.baidu.com/s/1GMbCqSYFM6KcCXfJQO47Pw
提取码:1234

这是10楼代码

TOP

链接:https://pan.baidu.com/s/1LWaWO1WtfaI9uOSMhprHng
提取码:1234

这是3楼代码

TOP

链接:https://pan.baidu.com/s/1ED_7kc5ASOuj8PLNoo0TaQ
提取码:1234

这是4楼代码

TOP

回复 13# 881966


如果需要上传文件,可以用阿里云盘或百度网盘。

如果需要上传截图,可以找个图床,例如:
http://bbs.bathome.net/thread-60985-1-1.html
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 22# Batcher


    谢谢管理

今天好像异常,上传百度盘了


麻烦大家了:handshake

TOP

  1. @echo off
  2. cd.>b.txt
  3. for /f "delims=" %%i in ('type "a.txt" ^| findstr /n .*') do (
  4.         set "str=%%i"
  5.         setlocal enabledelayedexpansion
  6.         set "str=!str:*:=!"
  7.         if "!str!" equ "" (
  8.                 >>b.txt echo,!str!
  9.         )
  10.         if not "!str!" equ "" (
  11.                 set n=
  12.                 for /f "delims=" %%c in ("!str!") do (
  13.                         set "str3=%%c"
  14.                 )
  15.                 for /f "delims=" %%b in ('type "b.txt"') do (
  16.                         if "!str3!" equ "%%b" (
  17.                                 set n=1
  18.                         )
  19.                 )
  20.                 if not defined n (
  21.                         >>b.txt echo,!str!
  22.                 )
  23.         )
  24.         endlocal
  25. )
  26. pause
复制代码

水平有限,想不出完美办法,只能折中,使用前手动替换全文中的"!"为其它字符,使用此代码后替换回"!",方可基本解决你的问题。
或者直接使用代码,特殊情况下会出错。
1

评分人数

bat小白,请多指教!谢谢!

TOP

  1. @if(0)==(0) echo off
  2. cd /d "%~dp0"
  3. type a.txt | cscript //nologo //e:jscript "%~f0" > b.txt
  4. pause & exit
  5. @end
  6. var map = {}
  7. while(!WSH.StdIn.AtEndOfStream){
  8.     var s = WSH.StdIn.ReadLine();
  9.     if(s == ''){
  10.         WSH.Echo(s);
  11.     } else if(!map.hasOwnProperty(s)){
  12.         map[s] = true;
  13.         WSH.Echo(s);
  14.     }
  15. }
复制代码
1

评分人数

TOP

回复 24# 77七


    再次感谢 ,让你费心了,

TOP

回复 25# WHY


    谢谢坛友的帮助

TOP

  1. @echo off
  2. powershell "$Hash = @{};(GC '.\a.txt').Where({if (!$Hash.Contains($_)){$Hash.Add($_,++$i)}});($Hash.GetEnumerator()| Sort Value).Key"
  3. pause
复制代码
1

评分人数

TOP

返回列表