vbs.runauto_vbs regexp_如何关闭自动更新

vbs.runautovbs.runauto

利用vbscript脚本修改文件内容，此适用于自动化的操作中

'新建一个Replace.vbs脚本，脚本内容如下，程序运行时输入三个参数：查找内容，替换内容，文件

复制代码代码如下:

DimFileName,Find,ReplaceWith,FileContents,dFileContents

Find=WScript.Arguments(0)

ReplaceWith=WScript.Arguments(1)

FileName=WScript.Arguments(2)

'读取文件

FileContents=GetFile(FileName)

'用“替换内容”替换文件中所有“查找内容”

dFileContents=replace(FileContents,Find,ReplaceWith,1,-1,1)

'比较源文件和替换后的文件

ifdFileContents<>FileContentsThen

'保存替换后的文件

WriteFileFileName,dFileContents

Wscript.Echo"Replacedone."

IfLen(ReplaceWith)<>Len(Find)Then

'计算替换总数

Wscript.Echo_

((Len(dFileContents)-Len(FileContents))/(Len(ReplaceWith)-Len(Find)))&_

"replacements."

EndIf

Else

Wscript.Echo"SearchedstringNotInthesourcefile"

EndIf

'读取文件

functionGetFile(FileName)

IfFileName<>""Then

DimFS,FileStream

SetFS=CreateObject("Scripting.FileSystemObject")

onerrorresumeNext

SetFileStream=FS.OpenTextFile(FileName)

GetFile=FileStream.ReadAll

EndIf

EndFunction

'写文件

functionWriteFile(FileName,Contents)

DimOutStream,FS

onerrorresumeNext

SetFS=CreateObject("Scripting.FileSystemObject")

SetOutStream=FS.OpenTextFile(FileName,2,True)

OutStream.WriteContents

EndFunction

QQ空间新浪微博腾讯微博搜狐微博人人网开心网百度搜藏更多

Tags：利用vbscript脚本修改文件内容 此适用于自动化的操作中

相关文章

2008-05-05用VBS脚本实现更换Windows Xp序列号的代码

2006-11-11VBS教程：属性-SerialNumber 属性

2006-11-11VBS教程：函数-InStr 函数

2006-11-11VBS教程：方法-GetFile 方法

2007-03-03用vbs将名称转换为正确的大小写的代码

2006-11-11VBS教程：方法-ReadLine 方法

2006-10-10SendKeys参考文档

2006-11-11VBS教程：VBscript属性-Pattern 属性

2011-01-01纯vbs实现zip压缩与unzip解压缩函数代码

2008-06-06初窥WMI_Vbs脚本编程简明教程补充读物

最 近 更 新

利用WMI实现系统补丁检测分析

15分钟提醒一次，珍惜时间啊

用vbs实现配置静态 IP 地址

批量文件查找替换功能的vbs脚本

reg2vbs.vbs 将Reg文件转换为VBS文件保存

VBS.Runauto脚本病毒分析篇

使用VBS访问外部文本文件一些方法和脚本实

vbs 定时删除功能实现代码

用vbs实现禁用服务

用vbscript合并多个文本文件的代码

热 点 排 行

vbs整人代码大集合 多年的代码收

Wscript.Shell 对象详细介绍！！

vbs脚本大全，配有实例 DOS命令，

按键精灵 脚本-学习VBS的一个不错

VBS操作Excel常见方法

VBS常用脚本 好东西

收藏的比较精典VBS代码

vbs教程 chm下载

运行bat时隐藏cmd窗口的方法(bat

常用VBS代码 值得一看

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-22092-1.html