[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
qingfengzhixia1

Rank: 2

帖子
1 
积分
169 
技术
0  
捐助
0  
注册时间
2008-11-6 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 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%">&nbsp;</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%">&nbsp;</TD>
      </tr>
……
  </TR></TBODY></TABLE>
</DIV>
</BODY>
</HTML>



我想把2.txt文件的内容与chaptermodel.txt
中          [[Content]]相替换.

我对VBS不懂,忘路过的大侠能解决一下,谢谢了!
收藏 分享

zqz0012005

Rank: 8Rank: 8

帖子
1069 
积分
12123 
技术
38  
捐助
0  
注册时间
2008-5-10 
2楼
发表于 2008-11-6 23:46 | 只看该作者 
  1. Set fso = CreateObject("Scripting.FileSystemObject")

  2. fso.OpenTextFile("chaptermodel.htm",2,true).Write Replace(fso.OpenTextFile("chaptermodel.txt").ReadAll, "[[Content]]", fso.OpenTextFile("2.txt").ReadAll)
复制代码
命令行参考：hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心，别人才愿意奉献热心！
把查看手册形成条件反射！

TOP

lixiaodaoaaa

Rank: 5Rank: 5

帖子
295 
积分
1142 
技术
2  
捐助
0  
注册时间
2008-2-4 
3楼
发表于 2008-11-7 14:19 | 只看该作者

好一个vbs

又一个vbs ，代码没有看懂多少，汗。。
我的百度空间欢迎你

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14927 
积分
46133 
技术
857  
捐助
745  
注册时间
2008-6-9 
4楼
发表于 2008-11-7 20:44 | 只看该作者

回复 3楼 的帖子

参考教程：Windows 脚本技术
http://bbs.bathome.net/thread-1985-1-1.html
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表