vbs如何定期监控-创新互联

这篇文章主要介绍了vbs如何定期监控,具有一定借鉴价值,感兴趣的朋友可以参考下,希望大家阅读完这篇文章之后大有收获,下面让小编带着大家一起了解一下。

让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名申请雅安服务器托管、营销软件、网站建设、聂拉木网站维护、网站推广。

系统:Windows 7

引言

有些时候需要定期去执行一段程序,怎么办?这里提供一个方法,虽然有点绕,但效果还不错
时间控制部分使用vbs实现

思考:实验设计
目标:定期执行一个Python程序
vbs脚本作为时间控制部分,定期运行一个bat文件,bat文件再执行python文件

逻辑过程

vbs如何定期监控

代码

vbs部分

Dim wshDim current_dir
Dim run_mode
Dim bat_addrMsgBox "此脚本旨在定期运行python语句"

Set wsh = CreateObject("Wscript.Shell")
current_dir = wsh.currentdirectory

Do While True
  bat_addr = "run.bat"
  wsh.run bat_addr, 0, True
  Wscript.sleep (2*1000) '休息2秒 

Loop

代码截图

vbs如何定期监控

bat部分

python main.py

python部分

import win32apiimport win32con

win32api.MessageBox(0, "python在运行", "提示", win32con.MB_OK)

代码截图

vbs如何定期监控

运行结果

vbs如何定期监控

代码解读

wsh.run bat_addr, 0, True,运行bat_addr命令

0,表示不显示运行窗口,如果写1,则显示运行窗口,如下图

True,表示是否等待后面程序执行完毕,再执行下面的语句,如果写False,效果如下,有一种中病毒的感觉

为什么采用这种方法呢?vbs这种方式定期运行,对电脑资源的消耗是非常小的。例如我的电脑,对CPU的消耗几乎为0,内存的消耗大概3000K,还是在接受的范围内(notepad++的内存消耗为20000K左右,只打开文中3个文件的情况下)

参数写1时,效果

vbs如何定期监控

False,效果

vbs如何定期监控

感谢你能够认真阅读完这篇文章,希望小编分享的“vbs如何定期监控”这篇文章对大家有帮助,同时也希望大家多多支持创新互联网站建设公司,,关注创新互联行业资讯频道,更多相关知识等着你来学习!


名称栏目:vbs如何定期监控-创新互联
文章网址:http://scyanting.com/article/ddsjoi.html