批处理之家 - Powered by Discuz! Board

标题: [文本处理] [已解决]批处理怎样删除指定字符串之前和之后以及两个指定字符串之间的内容？ [打印本页]

作者: xp3000 时间: 2014-2-26 05:05 标题: [已解决]批处理怎样删除指定字符串之前和之后以及两个指定字符串之间的内容？

本帖最后由 pcl_test 于 2017-5-5 13:37 编辑

目录下有上千个TXT要删除无用的内容，需要3个选项，
在需要处理的目录下建个BAT，点击下就能进入选项，输入指定字符串内容进行操作该怎么写？
选项1删除指定字符串之前内容
选项2删除A字符到B字符之间内容
选项3删除指定字符串之后的内容

批处理需要删除的内容：
1：删除“孤寂之狼”之前内容
2：删除“97言情小说网”到“free97.cn”之间的内容
3：删除“收藏此书加入书签”之后的内容

处理文本内容如下：

第0248章各怀心思 - 好色小姨 - 都市言情 - 97言情小说网分享到一键分享QQ空间新浪微博百度云收藏人人网腾讯微博百度相册开心网腾讯朋友百度贴吧豆瓣网搜狐微博百度新首页QQ好友和讯微博更多...百度分享97言情小说网097言情小说网首页最新小说小说排行榜小说库会员中心个人书架小说排行榜：总排行榜－月排行榜－周排行榜| 小说推荐榜：总推荐榜－月推荐榜－周推荐榜| 最近更新小说最新入库小说小说收藏榜小说字数榜作品分类: ┊ 玄幻?魔法 ┊ 武侠?修真 ┊ 都市?言情 ┊ 穿越?时空 ┊ 侦探?推理 ┊ 网游?动漫 ┊ 科幻?小说 ┊ 恐怖?灵异 ┊ 散文?诗词 ┊ 其他?类型 ┊ 全本书库我们致力打造更新最快，最全的免费言情小说网---97言情小说网好棒~~o(≧v≦)o~~好棒欢迎您， [ 我的书架 ] 哇！繁體版小说搜索书名作者热门作者：古灵寄秋简璎席绢有容楼雨晴金萱于晴千寻裘梦宋雨桐
97言情小说网 > 都市言情 > 孤寂之狼 > 好色小姨宽度默认90%80%70%60%字号默认12px13px14px15px16px17px18px20pt24pt底色默认蓝色白色淡蓝淡灰灰色深灰暗灰绿色明黄字色黑色红色绿色蓝色棕色行距默认特大大中小滚屏1慢23456789快第0248章各怀心思文 / 孤寂之狼
第0248章各怀心思
97言情小说网--好看的言情小说AGVXVFapX64Kqg27w54www.free97.cn
秦旭完全奔溃了。
97言情小说网--好看的言情小说deEQmFFKiBZXnvFwww.free97.cn
她只不过将叶凡的胳膊拿起来，用牙齿轻轻`咬了一下而已。她的想法很简单，就只是想给这个花心的男人一点点惩戒。可是，当牙齿刚刚落在他的手臂上的时候，他就发出了那一声惨厉的痛呼声。
97言情小说网--好看的言情小说n6tXxSfHKhoovm8TKJ9www.free97.cn
便是连秦旭，都感觉到他的喊叫声很凄惨，就如同胳膊都断了似的。更不要说不明真`相的人了。
97言情小说网--好看的言情小说xWh5I7PDdXOwww.free97.cn
秦旭浑身颤抖着，无力的的呻`吟一声。遇上这样痞赖的人，他能有什么办法呢？
97言情小说网--好看的言情小说sX0MMqXRfHXSQoT03Bwww.free97.cn
李艳和秦芳却还不明正想，以为秦旭在教训叶凡来着。不过这教训也太实在了吧？没听人家叶凡叫的很凄惨嘛。不过一想到这家伙本来就很乖张的性格，对这个凄惨痛呼声打了个折扣。
97言情小说网--好看的言情小说plYkgZNGYoZpu0jwww.free97.cn
不过就算如此，她们也是一声鸡皮疙瘩。这是要多疼啊，才能发出这样的声音。
97言情小说网--好看的言情小说WMOKog9he7h0aFHtqLmPwww.free97.cn
随着宁静被打破，李艳和秦芳就忍不住扑哧一下了一声。也许是感觉到这种氛围下并不适合笑，两人便又憋住了。
97言情小说网--好看的言情小说j7Cqg8skqL5uMD0dMPWwww.free97.cn
而浴`室内的张琴，在听到这一声惨叫时，才突然从那舒服的幻觉中回过神来。突地一下跳了起来，脸色羞得通红。她这才明白过来自己这半个多小时内究竟做了什么。
97言情小说网--好看的言情小说gurXKGi00s72qnAUwww.free97.cn

（文章很长，省略号省略掉了）……………………………………

收藏此书加入书签

（快捷键 ←）上一章本书目录下一章（快捷键 →）

加入书架书签 | 推荐本书 | 打开书架 | 返回书页 | 返回书目

请所有作者发布作品时务必遵守国家互联网信息管理办法规定，我们拒绝任何**小说，一经发现，即作删除
本站所收录作品、社区话题、书库评论及本站所做之广告均属其个人行为，与本站立场无关
阅读者如发现作品内容确有与法律抵触之处，可向我们举报添加到收藏夹 | 自动访问97言情小说网 | 复制本页地址 Copyright?2009-2012 http://www.free97.cn湘ICP备11017946号-1
-
-

作者: xp3000 时间: 2014-2-26 05:13

需要的最终处理效果：

第0248章各怀心思

秦旭完全奔溃了。

她只不过将叶凡的胳膊拿起来，用牙齿轻轻`咬了一下而已。她的想法很简单，就只是想给这个花心的男人一点点惩戒。可是，当牙齿刚刚落在他的手臂上的时候，他就发出了那一声惨厉的痛呼声。

便是连秦旭，都感觉到他的喊叫声很凄惨，就如同胳膊都断了似的。更不要说不明真`相的人了。

秦旭浑身颤抖着，无力的的呻`吟一声。遇上这样痞赖的人，他能有什么办法呢？

李艳和秦芳却还不明正想，以为秦旭在教训叶凡来着。不过这教训也太实在了吧？没听人家叶凡叫的很凄惨嘛。不过一想到这家伙本来就很乖张的性格，对这个凄惨痛呼声打了个折扣。

不过就算如此，她们也是一声鸡皮疙瘩。这是要多疼啊，才能发出这样的声音。

随着宁静被打破，李艳和秦芳就忍不住扑哧一下了一声。也许是感觉到这种氛围下并不适合笑，两人便又憋住了。

而浴`室内的张琴，在听到这一声惨叫时，才突然从那舒服的幻觉中回过神来。突地一下跳了起来，脸色羞得通红。她这才明白过来自己这半个多小时内究竟做了什么。

（文章很长，省略号省略掉了）……………………………………

作者: zhanglei1371 时间: 2014-2-26 10:17

将以下代码保存为VBS文件，修改相应目录C：\12为放txt文件的目录，修改相应的关键词，双击执行即可。

Dim fso,fo,file
str1="孤寂之狼"
A="97言情小说网"
B="free97.cn"
str2="收藏此书加入书签"
Set fso=CreateObject("scripting.filesystemobject")
Set re=New RegExp
re.Global=True
Set file=fso.GetFolder("c:\12\").Files
For Each f In file
	aa=Right(f.Path,3)
	If Right(f.Path,3)="txt" then
		txt=fso.OpenTextFile(f.Path).ReadAll
		re.Pattern="[\s\S]*"&str1&"([\s\S]+)"&str2&"[\s\S]*$"
		txt1=re.Replace(txt,"$1")
		re.Pattern=A&".+"&B&"[\s\S]{2}"
		txt1=re.Replace(txt1,"")
		
fso.OpenTextFile(f.Path,2,True).Write txt1
	End if
Next
MsgBox "已完成！",vbOKOnly,"完成"
复制代码

作者: xp3000 时间: 2014-2-26 13:31

批量处理有没有易操作高效的？需要带选项试的，可以分开操作。
比如把BAT放到TXT目录，点击后出现出现3个选项，分别为1、2、3，
选项1删除指定字符串之前内容
选项2删除A字符到B字符之间内容
选项3删除指定字符串之后的内容
可以自行选择想要删除的选项，然后输入内容完成。

作者: apang 时间: 2014-2-26 20:50

本帖最后由 apang 于 2014-2-26 20:55 编辑

@set @n=0;/* & echo off
echo,1 删除“孤寂之狼”之前内容
echo,2 删除“97言情小说网”到“free97.cn”之间内容
echo,3 删除“收藏此书加入书签”之后内容
set /p Input=输入[1-3]（默认3）：
dir /b *.txt|cscript -nologo -e:jscript "%~0" "%Input%"
pause & exit/b & rem */
arg = WScript.Arguments(0);
fso = new ActiveXObject("Scripting.FileSystemObject");
while (!WSH.StdIn.AtEndOfStream) {
    f = WSH.StdIn.ReadLine();
    txt = fso.OpenTextFile(f,1).ReadAll();
    if (arg == "1") {
        txt = txt.replace(/[\s\S]*孤寂之狼/,"");
    } else {
        if (arg == "2") {
            txt = txt.replace(/97言情小说网[\s\S]*?free97\.cn/ig,"");
        } else txt = txt.replace(/收藏此书加入书签[\s\S]*$/,"");
    };
    fso.OpenTextFile(f,2).Write(txt);
}
复制代码

欢迎光临批处理之家 (http://bathome.net./)