반응형
// replace용 vbs 파일 생성 (파일명 : replace.vbs)
Const ForReading = 1
Const ForWriting = 2
strFilenName = Wscript.Arguments(0)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFilenName, ForReading)
strText = objFile.ReadAll
objFile.Close
strNewText = strText
'변경할 문자열 등록
strNewText = Replace(strNewText, "AAAA" , "BBBB" )
strNewText = Replace(strNewText, "CCCC" , "DDDD" )
Set objFile = objFSO.OpenTextFile(strFilenName, ForWriting)
objFile.Write strNewText
objFile.Close
// cmd창에서 replace.vbs를 실행하여 파일내에 문자열 치환
cscript replace.vbs "파일명"
'전산Tip' 카테고리의 다른 글
[xcopy] 작업폴더 일자별 백업하기 (1) | 2021.04.18 |
---|---|
[MSSQL] 테이블 레이아웃 조회 (0) | 2019.05.03 |
Autorun 삭제 (0) | 2008.11.01 |