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

[其他] 【已解决】如何用批处理调整BAT代码中的行

本帖最后由 思想之翼 于 2023-6-11 09:31 编辑

如何用批处理代码,将下述BAT代码的第7行提到第6行?
@echo off
for /l %%f in (1000001,1,1001798) do (
    setlocal enabledelayedexpansion
    set p=%%f
        paste ......
        gawk ......【1】
        bwfr  ......【2】

    endlocal
)
exit

结果为:
@echo off
for /l %%f in (1000001,1,1001798) do (
    setlocal enabledelayedexpansion
    set p=%%f
        paste ......
        bwfr  ......【2】
        gawk ......【1】

    endlocal
)
exit
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

  1. @echo off
  2. %1 >2.bat (for /f "tokens=1* delims=:" %%a in ('%0 rem') do echo %%b) & exit
  3. findstr /n .* 1.bat |findstr /rbc:"[1-5,7]:"
  4. findstr /n .* 1.bat |findstr /rbvc:"[1-5,7]:"
复制代码
1

评分人数

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

TOP

回复 5# 思想之翼
  1. set fso=createobject("scripting.filesystemobject")
  2. a=split(fso.opentextfile("1.bat",1).readall(),vbcrlf)
  3. t=a(5)
  4. a(5)=a(6)
  5. a(6)=t
  6. set f=fso.createtextfile("1.bat",true)
  7. for each aa in a
  8. f.writeline aa
  9. next
  10. f.close()
复制代码
测试代码不要用你提供的 里面的【记事本检测到会自动把编码转成utf16 就读不了了 utf8可以
1

评分人数

你好

TOP

回复 4# jyswjjgdwtdtj
感谢帮助!vbs代码运行时,出现第3行下标越界,代码800A0009

TOP

批处理不会 vbs行不?
  1. set fso=createobject("scripting.filesystemobject")
  2. a=split(fso.opentextfile("1.bat",1).readall(),vbcrlf)
  3. t=a(6)
  4. a(6)=a(7)
  5. a(7)=t
  6. set f=fso.createtextfile("1.bat",true,true)
  7. for each aa in a
  8. f.writeline aa
  9. next
  10. f.close()
复制代码
bat应该也差不多 读文件 写数组 变量兑换内容 写文件
1

评分人数

你好

TOP

回复 2# czjt1234
谢谢关注!根据行数调整

TOP

根据行数调整,还是根据该行的内容进行判断调整

QQ 20147578

TOP

返回列表