码迷,mamicode.com
首页 > 其他好文 > 详细

一段阻止电脑索屏的Vb Script

时间:2017-05-17 16:03:31      阅读:116      评论:0      收藏:0      [点我收藏+]

标签:duration   拷贝   .sh   保存   bsp   min   运行   next   code   

创建一个文件,拷贝下面文本,保存文件为~.vbs,双击运行即可。

Dim durationInMins
Set obj = CreateObject("WScript.Shell")

durationInMins = 300

For i=1 to durationInMins
	WScript.Sleep (2*60*1000)
	obj.SendKeys ("{CAPSLOCK 2}")
Next

 

一段阻止电脑索屏的Vb Script

标签:duration   拷贝   .sh   保存   bsp   min   运行   next   code   

原文地址:http://www.cnblogs.com/genezhao/p/6867790.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!