无为清净楼资源网 Design By www.qnjia.com
有时候我们需要将一个目录与子目录中的多个htm网页文件实现批量替换,这里就为大家分享一下
将以下代码复制到一个文本文档中,并将文本文档的后缀修改为.vbs,直接运行即可
Set WshShell = CreateObject("Wscript.Shell") WshShell.Run "cmd /c dir /s/b *.htm > list.htm",vbHide Wscript.Sleep 1000 sFile = "list.htm" 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, "需要替换的内容", "替换后的内容") Set File = objFSO.OpenTextFile(strLine, 2) File.Write aryLines File.Close End If Loop oFile.Close objFSO.DeleteFile sFile Set objFSO = Nothing
cmd /c dir /s/b *.htm > list.htm就是将子目录中所哟的htm文件列出来保存到list.htm文件中。
文件替换就是通过vbs中的FileSystemObject实现批量替换,具体的可以参考这篇文章
如果替换的内容中包含有转义字符的话,需要注意转义一下
PS:VBScript的相关转义字符:
"/" (反斜杠)
VbCrLf (换行符,用来表示重起一行)
VbTab (水平制表符)
Chr(8) (退格符)
vbCr (回车符)
"'" (单引号)
/" - > "" (双引号)
标签:
vbs,批量替换,多目录,多文件
无为清净楼资源网 Design By www.qnjia.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
无为清净楼资源网 Design By www.qnjia.com
暂无评论...
RTX 5090要首发 性能要翻倍!三星展示GDDR7显存
三星在GTC上展示了专为下一代游戏GPU设计的GDDR7内存。
首次推出的GDDR7内存模块密度为16GB,每个模块容量为2GB。其速度预设为32 Gbps(PAM3),但也可以降至28 Gbps,以提高产量和初始阶段的整体性能和成本效益。
据三星表示,GDDR7内存的能效将提高20%,同时工作电压仅为1.1V,低于标准的1.2V。通过采用更新的封装材料和优化的电路设计,使得在高速运行时的发热量降低,GDDR7的热阻比GDDR6降低了70%。
更新日志
2024年06月15日
2024年06月15日
- 【发烧天碟】汤姆·罗素《上帝使者》1999[FLAC+CUE]
- 齐秦.2024-虛度(EP)【力行】【FLAC分轨】
- 高明瀚.1991-我认真,因为我要去看世界【滚石】【WAV+CUE】
- 谢宜君.2021-北海道之恋【豪记】【WAV+CUE】
- 龙飘飘唱片《龙飘飘畅销精选辑》[WAV+ CUE][531M]
- 黄小琥《单曲合集44首》[FLAC][1.2G]
- 黄婉婷《达坂城姑娘 DSD》[WAV+CUE][472M]
- 萤火突击怎么卡无人局 匹配人数设置方法
- 萤火突击怎么邀请好友组队 好友组队方法介绍
- 萤火突击怎么快速升级仓库 仓库升级方法介绍
- 【发烧唱片】《马兰士顶级音响测试唱片》[FLAC+CUE]
- 【轻音乐】曼托凡尼乐团《作品精选辑》2006[FLAC+CUE]
- 俞丽拿沈榕-梁祝(珍藏版)小提琴协奏曲《梁山伯与祝英台》创作50周年纪念[2CD]》[WAV+CUE]
- 开心少女组.1986-开心油戏(2016环球经典礼赞版)【环球】【WAV+CUE】
- 苏慧伦.2007-左撇子旋转门【环球】【WAV+CUE】