如何实现可以修改脚本自身运行次数的vbs-创新互联

小编给大家分享一下如何实现可以修改脚本自身运行次数的vbs，相信大部分人都还不怎么了解，因此分享这篇文章给大家参考一下，希望大家阅读完这篇文章后大有收获，下面让我们一起去了解一下吧！

成都创新互联是专业的临潼网站建设公司，临潼接单;提供成都网站建设、成都网站设计,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行临潼网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

代码如下:

Const n = 1
Dim f, a, s, w
w = WScript.ScriptFullName
Set f = CreateObject("Scripting.FileSystemObject")
Set a = f.OpenTextFile(w, 1)
a.SkipLine
s = chr(13) & Chr(10) & a.ReadAll
a.Close

Set a = f.CreateTextFile(w, True)
a.Write "Const n = " & n + 1 & s
a.Close

WScript.echo "This script has been run " & n & " times"

原理就是每次运行脚本自身的代码就会被修改Const n = 1，这个1是一直变化的。

以上是“如何实现可以修改脚本自身运行次数的vbs”这篇文章的所有内容，感谢各位的阅读！相信大家都有了一定的了解，希望分享的内容对大家有所帮助，如果还想学习更多知识，欢迎关注创新互联行业资讯频道！

文章名称：如何实现可以修改脚本自身运行次数的vbs-创新互联
地址分享：http://cdkjz.cn/article/hpshd.html