-
當(dāng)前位置:首頁(yè) > 創(chuàng)意學(xué)院 > 技術(shù) > 專題列表 > 正文
TXT批量修改章節(jié)目錄
大家好!今天讓創(chuàng)意嶺的小編來(lái)大家介紹下關(guān)于TXT批量修改章節(jié)目錄的問(wèn)題,以下是小編對(duì)此問(wèn)題的歸納整理,讓我們一起來(lái)看看吧。
開(kāi)始之前先推薦一個(gè)非常厲害的Ai人工智能工具,一鍵生成原創(chuàng)文章、方案、文案、工作計(jì)劃、工作報(bào)告、論文、代碼、作文、做題和對(duì)話答疑等等
只需要輸入關(guān)鍵詞,就能返回你想要的內(nèi)容,越精準(zhǔn),寫出的就越詳細(xì),有微信小程序端、在線網(wǎng)頁(yè)版、PC客戶端
官網(wǎng):https://ai.de1919.com。
創(chuàng)意嶺作為行業(yè)內(nèi)優(yōu)秀的企業(yè),服務(wù)客戶遍布全球各地,如需了解SEO相關(guān)業(yè)務(wù)請(qǐng)撥打電話175-8598-2043,或添加微信:1454722008
本文目錄:
一、txt小說(shuō)目錄批量重命名 需要將(1)(2)替換為第一章 第二章不然ireader無(wú)法識(shí)別章節(jié)目錄,最好有軟件可
下載全本的,要不換個(gè)播放器
二、bat批量修改txt文件里的內(nèi)容,以txt文件名(目錄名+文件名)替換固定字符串
不清楚你的實(shí)際文件/情況,僅以問(wèn)題中的說(shuō)明及猜測(cè)為據(jù)
復(fù)制粘貼到記事本,另存為xx.bat,編碼選ANSI
<# :cls
@echo off
rem 將多個(gè)txt文本文件里的指定內(nèi)容/固定內(nèi)容替換成文件所在的目錄名+文件名
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::Default))) -Args '%~dp0'"
echo;%#% +%$%%$%/%@% %z%
pause
exit
#>
$folder='.';
$findword='111';
$enc=[Text.Encoding]::Default;
$files=@(dir -liter $folder -recurse|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])});
for($i=0;$i -lt $files.length;$i++){
write-host $files[$i].Name;
$oldtext=[IO.File]::ReadAllText($files[$i].FullName, $enc);
$newtext=$oldtext.replace($findword, $files[$i].Directory.Name+'/'+$files[$i].Name);
[IO.File]::WriteAllText($files[$i].FullName, $newtext, $enc);
};
三、怎么批量修改TXT內(nèi)容?
懂的話,很簡(jiǎn)單就能實(shí)現(xiàn)。用Word打開(kāi)該txt文件,然后Ctrl+H打開(kāi)替換對(duì)話框,單擊高級(jí),勾選使用通配符,在查找框中輸入:(第*章)*^13,替換為框中輸入:\1^13,單擊全部替換即可。根本用不著什么xtFormat,簡(jiǎn)直答非所問(wèn)。
四、批處理批量修改txt文件里面的內(nèi)容
@echo
off
for
/f
"delims="
%%i
in
('dir
/s/b
*.txt')
do
(
for
/f
"delims="
%%a
in
('type
"%%~fi"')
do
(
set
"foo=%%a"
call,set
foo=%%foo:1234=4311%%
call,echo/%%foo%%>>"%%~fi._"
)
move
"%%~fi._"
"%%~fi"
)
exit
以上為批處理代碼,保存為bat文件,雙擊執(zhí)行,使用前備份文件。另給出VBS方案:
Set
WshShell
=
CreateObject("Wscript.Shell")
WshShell.Run
"cmd
/c
dir
/s/b
*.txt
>
list.txt",vbHide
Wscript.Sleep
1000
sFile
=
"list.txt"
Set
objFSO
=
CreateObject("Scripting.FileSystemObject")
Set
oFile
=
objFSO.OpenTextFile(sFile,1)
Do
While
Not
oFile.AtEndOfStream
strLine
=
oFile.ReadLine
If
Len(strLine)
>
0
Then
Set
File
=
objFSO.OpenTextFile(strLine,
1)
aryLines
=
File.ReadAll
File.Close
aryLines
=
Replace(aryLines,
"1234",
"4311")
Set
File
=
objFSO.OpenTextFile(strLine,
2)
File.Write
aryLines
File.Close
End
If
Loop
oFile.Close
objFSO.DeleteFile
sFile
Set
objFSO
=
Nothing
保存為VBS文件,放到TXT文件目錄,雙擊執(zhí)行。
----------------------------------------
兩段代碼都可以實(shí)現(xiàn)批量替換,無(wú)論在該文件夾的深度是多少。不用打開(kāi)TXT直接替換。不懂可以hi我。
以上就是關(guān)于TXT批量修改章節(jié)目錄相關(guān)問(wèn)題的回答。希望能幫到你,如有更多相關(guān)問(wèn)題,您也可以聯(lián)系我們的客服進(jìn)行咨詢,客服也會(huì)為您講解更多精彩的知識(shí)和內(nèi)容。
推薦閱讀:
公園規(guī)劃設(shè)計(jì)說(shuō)明(公園規(guī)劃設(shè)計(jì)說(shuō)明范文)
??茖W(xué)電子商務(wù)出來(lái)能干嘛(??茖W(xué)電子商務(wù)出來(lái)能干嘛工作)