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


    可能我没看懂你的问题,思路是遇到//后就切换上下行文本,只处理第一次遇到的//

TOP

回复 2# Nsqs
谢谢你的指教,您的代码我没看太明白,是不是大致意思是:遍历文件发现“//”就改掉,如果是这个思路有可能不太行,因为config.h文件中有多处以“//”开头的语句。

TOP

回复 4# codegay
敢问为什么讽刺吗?
这个帖子的问题太简单?

TOP

回复 3# /zhqsystem/zhq
谢谢你的指教,还有点问题请教你一下:
1. %~f1.%~x1 这是什么意思啊?
2. 脚本应该首先读config.h文件,再找到那两行进行后续的修改吧?

TOP

太讽刺了。
去学去写去用才有进步。安装python3代码存为xx.py 双击运行或右键用IDLE打开按F5运行

TOP

回复 1# swang21
  1. @echo off&(color 0e&chcp 936&setlocal enabledelayedexpansion)2>nul
  2. for /f "delims=" %%i in ('type "%~f1"')do (
  3. if /i "%%i"=="//#define RADIO_IP31 /* IP31 radio */" (set "if_one=1"
  4. )else if /i "%%i"=="#define RADIO_SK81 /* SK81 radio */" (set "if_two=1"
  5. )
  6. )
  7. echo,%if_one%%if_two%
  8. if /i "%if_one%%if_two%"=="11" (cd.>"%~f1.%~x1")
  9. if /i "%if_one%%if_two%"=="11" (
  10. for /f "delims=" %%i in ('type "%~f1"')do (
  11.   if /i "%%i"=="//#define RADIO_IP31 /* IP31 radio */" (
  12.    rem:
  13.   )else if /i "%%i"=="#define RADIO_SK81 /* SK81 radio */" (
  14.    (echo,%%i)>>"%~f1.%~x1"
  15.   )else (
  16.    (echo,%%i)>>"%~f1.%~x1"
  17.   )
  18. )
  19. )
  20. pause
复制代码
这么好的论坛你上哪找,运行测试环境为6.1.7601-64
注:请遵守互联网信息安全,勿用于非法用途

TOP

本帖最后由 Nsqs 于 2016-4-28 01:05 编辑
  1. dim fso,Wsc,WshPath,s(1),check(1)
  2. set fso=CreateObject("scripting.filesystemobject")
  3. Set Wsc=CreateObject("wscript.shell")
  4. WshPath=Fso.getparentfoldername(wsh.scriptfullname):Wsc.CurrentDirectory = WshPath
  5. file="2.txt"
  6. if not fso.fileexists(file) then wsh.quit
  7. sample="new_"&file
  8. if not fso.fileexists(sample) then fso.copyfile file,sample
  9. result=fso.opentextfile(sample).readall
  10. '正在处理,可能需要点时间...
  11. t=timer
  12. s(0)="//#define RADIO_IP31 /* IP31 radio */":s(1)="//#define RADIO_SK81 /* SK81 radio */"
  13. check(0)=instr(result,s(0))>0:check(1)=instr(result,s(1))>0
  14. if check(0)=-1  then _
  15. result=Replace(result,s(0),right(s(0),len(s(0))-2)):_
  16. result=Replace(result,right(s(1),len(s(1))-2),s(1)):_
  17. write
  18. if check(1)=-1 then _
  19. result=Replace(result,right(s(0),len(s(0))-2),s(0)):_
  20. result=Replace(result,s(1),right(s(1),len(s(1))-2)):_
  21. write
  22. sub write
  23. fso.createtextfile(sample).write result
  24. set fso=nothing
  25. msgbox Round(timer-t,2) & "秒完成!",64
  26. wsh.quit
  27. end sub
复制代码
保存vbs代码

TOP

返回列表