标题: [问题求助] VBS把一个文本里的指定字符串替换成另一个文本里的所有内容 [打印本页]
作者: qingfengzhixia1 时间: 2008-11-6 23:15 标题: VBS把一个文本里的指定字符串替换成另一个文本里的所有内容
本帖最后由 pcl_test 于 2016-10-3 23:57 编辑
VBS把整个文本内容替换指定字符
chaptermodel.txt
<HTML>
<HEAD>
<!--小说下载阅读器样式-->
<TITLE>[[title]]</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css">
<script src="../head.js" type="text/javascript"></script>
……
<TD width="4%"> </TD>
<TD width="92%" class="thetd" id="contenttd"><DIV style="WIDTH: 100%; HEIGHT: 132px" align="left"><span id="content">
<!--BookContent Start-->
[[Content]]
<!--BookContent End-->
</span></DIV></TD>
<TD width="4%"> </TD>
</tr>
……
</TR></TBODY></TABLE>
</DIV>
</BODY>
</HTML>
我想把2.txt文件的内容与chaptermodel.txt
中 [[Content]]相替换.
我对VBS不懂,忘路过的大侠能解决一下,谢谢了!
作者: zqz0012005 时间: 2008-11-6 23:46
- Set fso = CreateObject("Scripting.FileSystemObject")
- fso.OpenTextFile("chaptermodel.htm",2,true).Write Replace(fso.OpenTextFile("chaptermodel.txt").ReadAll, "[[Content]]", fso.OpenTextFile("2.txt").ReadAll)
复制代码
作者: lixiaodaoaaa 时间: 2008-11-7 14:19 标题: 好一个vbs
又一个vbs ,代码没有看懂多少,汗。。
作者: Batcher 时间: 2008-11-7 20:44 标题: 回复 3楼 的帖子
参考教程:Windows 脚本技术
http://bbs.bathome.net/thread-1985-1-1.html
欢迎光临 批处理之家 (http://bathome.net./) |
Powered by Discuz! 7.2 |