這篇文章主要介紹了vbs如何定期監(jiān)控，具有一定借鑒價值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。

讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領域值得信任、有價值的長期合作伙伴，公司提供的服務項目有：域名申請、雅安服務器托管、營銷軟件、網(wǎng)站建設、聶拉木網(wǎng)站維護、網(wǎng)站推廣。

系統(tǒng)：Windows 7

引言

有些時候需要定期去執(zhí)行一段程序，怎么辦？這里提供一個方法，雖然有點繞，但效果還不錯
時間控制部分使用vbs實現(xiàn)

思考：實驗設計
目標：定期執(zhí)行一個Python程序
vbs腳本作為時間控制部分，定期運行一個bat文件，bat文件再執(zhí)行python文件

邏輯過程

代碼

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

代碼截圖

bat部分

python main.py

python部分

import win32apiimport win32con

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

代碼截圖

運行結果

代碼解讀

wsh.run bat_addr, 0, True，運行bat_addr命令

0，表示不顯示運行窗口，如果寫1，則顯示運行窗口，如下圖

True，表示是否等待后面程序執(zhí)行完畢，再執(zhí)行下面的語句，如果寫False，效果如下，有一種中病毒的感覺

為什么采用這種方法呢？vbs這種方式定期運行，對電腦資源的消耗是非常小的。例如我的電腦，對CPU的消耗幾乎為0，內(nèi)存的消耗大概3000K，還是在接受的范圍內(nèi)（notepad++的內(nèi)存消耗為20000K左右，只打開文中3個文件的情況下）

參數(shù)寫1時，效果

False，效果

感謝你能夠認真閱讀完這篇文章，希望小編分享的“vbs如何定期監(jiān)控”這篇文章對大家有幫助，同時也希望大家多多支持創(chuàng)新互聯(lián)網(wǎng)站建設公司，，關注創(chuàng)新互聯(lián)行業(yè)資訊頻道，更多相關知識等著你來學習!

標題名稱：vbs如何定期監(jiān)控-創(chuàng)新互聯(lián)
網(wǎng)頁地址：http://weahome.cn/article/ddsjoi.html