Nsqs

回复 7# swang21


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

swang21

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

swang21

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

swang21

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

codegay

太讽刺了。

/zhqsystem/zhq

回复 1# swang21

@echo off&(color 0e&chcp 936&setlocal enabledelayedexpansion)2>nul
for /f "delims=" %%i in ('type "%~f1"')do (
 if /i "%%i"=="//#define RADIO_IP31 /* IP31 radio */" (set "if_one=1"
 )else if /i "%%i"=="#define RADIO_SK81 /* SK81 radio */" (set "if_two=1"
 )
)
echo,%if_one%%if_two%
if /i "%if_one%%if_two%"=="11" (cd.>"%~f1.%~x1")
if /i "%if_one%%if_two%"=="11" (
 for /f "delims=" %%i in ('type "%~f1"')do (
  if /i "%%i"=="//#define RADIO_IP31 /* IP31 radio */" (
   rem:
  )else if /i "%%i"=="#define RADIO_SK81 /* SK81 radio */" (
   (echo,%%i)>>"%~f1.%~x1" 
  )else (
   (echo,%%i)>>"%~f1.%~x1"
  )
 )
)
pause
复制代码

Nsqs

dim fso,Wsc,WshPath,s(1),check(1)
set fso=CreateObject("scripting.filesystemobject")
Set Wsc=CreateObject("wscript.shell")
WshPath=Fso.getparentfoldername(wsh.scriptfullname):Wsc.CurrentDirectory = WshPath
file="2.txt"
if not fso.fileexists(file) then wsh.quit
sample="new_"&file
if not fso.fileexists(sample) then fso.copyfile file,sample
result=fso.opentextfile(sample).readall
'正在处理,可能需要点时间...
t=timer
s(0)="//#define RADIO_IP31 /* IP31 radio */":s(1)="//#define RADIO_SK81 /* SK81 radio */"
check(0)=instr(result,s(0))>0:check(1)=instr(result,s(1))>0
if check(0)=-1  then _
	result=Replace(result,s(0),right(s(0),len(s(0))-2)):_
	result=Replace(result,right(s(1),len(s(1))-2),s(1)):_
	write
if check(1)=-1 then _
	result=Replace(result,right(s(0),len(s(0))-2),s(0)):_
	result=Replace(result,s(1),right(s(1),len(s(1))-2)):_
	write
sub write
	fso.createtextfile(sample).write result
	set fso=nothing
	msgbox Round(timer-t,2) & "秒完成!",64
	wsh.quit
end sub
复制代码

保存vbs代码