用VBS更簡單:
vbs代碼:
On Error Resume Next
Dim Fso,TxtFl,Str
Set Fso = CreateObject("Scripting.FileSystemObject")
Set TxtFl = Fso.OpenTextFile ("檔案位置",1)
Str = Replace ( TxtFl.ReadAll,"被替換内容","替換内容")
Set TxtFl = Fso.OpenTextFile ("檔案位置",2)
TxtFl.Write Str
TxtFl.Close
批處理代碼:
@echo off >tmp.ini
for /f "tokens=1* delims=:" %%i in ('findstr /n ".*" 檔案位置') do (
if "%%j"=="" (echo.>>tmp.ini) else (
echo %%j|find "被替換内容">nul&&(
call set tp=%%j&call echo %%tp:被替換内容=替換内容%%>>tmp.ini)||(
>>tmp.ini echo %%j)
)
)
copy tmp.ini 檔案位置 /y >nul||(attrib -s -a -r -h 檔案位置& copy tmp.ini 檔案位置 /y >nul)
del tmp.ini
pause
批處理打開和關閉檔案
關閉 兩種指令方法:
taskkill /f im "要關閉的程序名"
ntsd -c q -pn "要關閉程序名"
後者更強一點..~!
打開程式:
start "" “位置/程式名”
作者:Agoly 本文版權歸作者所有,歡迎轉載,但未經作者同意必須保留此段聲明,且在文章頁面明顯位置給出原文連接配接,否則保留追究法律責任的權利。 如果文中有什麼錯誤,歡迎指出。以免更多的人被誤導。 |