VBS把一个文本里的指定字符串替换成另一个文本里的所有内容

qingfengzhixia1 · 发表于 2008-11-6 23:15:59

本帖最后由 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">
      
      [[Content]]
      
      </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:39

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:19

又一个vbs ，代码没有看懂多少，汗。。

Batcher · 发表于 2008-11-7 20:44:49

参考教程：Windows 脚本技术
http://bbs.bathome.net/thread-1985-1-1.html

		自动登录	找回密码
密码			注册

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

[问题求助] VBS把一个文本里的指定字符串替换成另一个文本里的所有内容

好一个vbs

回复 3楼的帖子

浏览过的版块

[问题求助] VBS把一个文本里的指定字符串替换成另一个文本里的所有内容

好一个vbs

回复 3楼 的帖子

浏览过的版块

回复 3楼的帖子