找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 19762|回复: 6

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

[复制链接]
发表于 2023-6-11 03:39:55 | 显示全部楼层 |阅读模式
本帖最后由 思想之翼 于 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

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2023-6-11 07:54:57 | 显示全部楼层
根据行数调整,还是根据该行的内容进行判断调整
 楼主| 发表于 2023-6-11 08:01:59 | 显示全部楼层
回复 2# czjt1234
谢谢关注!根据行数调整
发表于 2023-6-11 08:21:35 | 显示全部楼层
批处理不会 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技术 +1 收起 理由
思想之翼 + 1 乐于助人

查看全部评分

 楼主| 发表于 2023-6-11 08:51:24 | 显示全部楼层
回复 4# jyswjjgdwtdtj
感谢帮助!vbs代码运行时,出现第3行下标越界,代码800A0009
发表于 2023-6-11 09:12:35 | 显示全部楼层
回复 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技术 +1 收起 理由
思想之翼 + 1 感谢分享

查看全部评分

发表于 2023-6-11 11:08:29 | 显示全部楼层
  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技术 +1 收起 理由
思想之翼 + 1 乐于助人

查看全部评分

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-18 18:25 , Processed in 0.018572 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表