如何实现可以修改脚本自身运行次数的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://myzitong.com/article/hpshd.html