想摸鱼？企业微信会变灰？快来看这个

想摸鱼？企业微信会变灰？快来看这个

#转自

065、VBS脚本-间隔一分钟按某个按键一次 - 知乎

最近因为同事工作摸鱼，企业微信那个小电脑标志变黑了，被老板dei了一顿骂。

        于是琢磨琢磨怎么去找一个摸鱼脚本。本来想着去自己用C++写一个，后面看到了vb写的脚本，话不多说直接上代码。

第一步：新建txt，并且敲入如下代码

Set objShell = CreateObject("Wscript.Shell") 
do
WScript.Sleep 60*1000
objShell.SendKeys "{F5}"                
loop

第二步：改txt为vbs

想要时间短一点，把上面的60改了就行，这个意思是60*1000ms。

然后点击运行

开始摸鱼把！

。。。。。。。。。。。

关闭的脚本代码：

dim WSHshell
set WSHshell = ateobject("wscript.shell")
WSHshell.run "taskkill / /f ",0 ,true 

操作类似

摸鱼才叫挣钱~