vbs定期监控 值个班，定期瞄一下
利用VBS脚本作为定时器，通过bat文件间接调用Python程序，实现轻量级定期执行任务。该方法无需额外依赖，资源消耗极低：CPU占用几乎为零，内存仅约3000K（3MB），适合在资源受限或需要简单定时场景中稳定运行。
系统：Windows 7
有时候，我们就是想让一段程序定期跑一跑，比如每天备份个文件、定时发个提醒什么的。直接写个死循环？太粗暴。用系统任务计划？又觉得有点重。这里分享一个取巧的方法：用 VBS 脚本做定时器，通过 bat 文件间接调用 Python 程序。路子算是弯了点，但胜在轻量、可控，资源消耗几乎可以忽略不计。
设计思路
目标很明确：定期执行一个 Python 脚本。拆解下来就是三个环节：
- 时间控制部分由 VBS 脚本承担，它负责循环等待，到了预定间隔就触发一次。
- VBS 不直接调用 Python，而是启动一个 bat 文件作为中间人。
- bat 文件里只做一件事——运行 python main.py。
整个链条就像一条流水线：VBS 定闹钟 → bat 跑腿 → 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
- 第1个参数：要执行的命令或程序路径，这里是 bat 文件。
- 第2个参数（窗口样式）：
0表示不显示运行窗口，后台静默执行。如果改成1，就会弹出一个命令行窗口，运行过程中你能看到黑框一闪而过（就像手动双击 bat 一样）。
- 第3个参数（是否等待）：
True表示 VBS 会等 bat 执行完再继续往下走（即等 Python 程序运行结束后才开始计时下一次）。如果写成False，VBS 会不管 bat 是否结束，直接开始下一次循环——这时候会连续弹出多个窗口，效果就像中了病毒一样，图就不多说了。
为什么绕这么一圈用 VBS 做定时器？
直接写 Python 死循环 + time.sleep 当然也可以，但 VBS 这种方式对系统资源的消耗确实非常低。实际测试下来，CPU 占用几乎为 0，内存占用大约 3000K 左右。对比一下：用 Notepad++ 只打开文中那三个文件，内存消耗已经接近 20000K。所以这点开销完全可以接受。
如果你只需要一个轻量级、不用安装任何额外依赖的定时执行方案，这套组合拳值得一试。
VBS脚本实现文件批量处理：一脚本从配置文件读取关键字，遍历文件夹内容，匹配后重命名添加.bak后缀并记日志；另一脚本根据文件路径列表，对衍生文件批量重命名添加.tmp后缀。
VBS调用Shell.Application的ShellExecute方法时需先创建对象。参数包括文件名、附加参数、目录、操作和窗口类型。操作包括编辑、查找、打开、打印、属性、以管理员身份运行六种，窗口类型用0至10数值控制。实战示例以管理员权限运行cmd.exe添加用户。
利用ADODB.Stream对象，VBScript可实现字符串编码转换。核心思路是先将字符串按源编码转为二进制字节流，再按目标编码还原。提供StringToBytes、BytesToString和AlterCharset三个函数，支持GB2312与ISO-8859-1等单字节编码间的转换，适用于旧系统或硬件交互场景。
通过WMI调用Win32_PingStatus实现批量Ping检测，支持循环监测与断线计数。连续失败10次自动发送邮件告警，日志和控制台同步输出。需CScript环境运行，脚本已自动处理切换，适用于多IP持续监控场景。
利用VBS脚本制作循环表白弹窗，点击“否”时依次显示“女友最大”“工资上交”等六个承诺，点击“是”则展现字符爱心与浪漫告白。操作需新建文本文档，粘贴代码后另存为ANSI编码的.vbs文件，双击运行即可。
利用VBS脚本通过InternetExplorer.Application对象操控网页，自动填写账号密码并提交，实现开机自动登录网站。需根据实际页面修改网址、表单及输入框的name属性。将脚本放入系统启动文件夹即可开机自启。
VBS是Windows内置脚本语言，无需安装环境，用记事本即可编写。通过Msgbox和Inputbox函数实现弹窗输出与交互。编写时需注意：文件后缀为.vbs，符号使用英文半角，编码格式改为ANSI，否则中文可能乱码。
VBS脚本基础语法涵盖变量定义、输入输出、判断与循环语句。变量可用“dim”声明，支持自动类型推断；输入输出分别通过inputbox和msgbox实现；判断语句以if...then...else...endif结构为主；循环包括do-loop（支持until、while条件及exitdo控制）和for-next结构。
使用VBS脚本可收集域内远程或本地计算机的软件及Windows版本信息，结果保存为以计算机名命名的txt文件，支持网络路径或脚本目录。脚本内置过滤规则，自动剔除补丁包、Office组件及NVIDIA、Intel驱动等系统组件，兼容32位和64位系统。
VBS脚本在64位系统中因默认调用64位WScript.exe导致32位ActiveX组件无法创建，出现800A01AD错误。可通过修改注册表将解释器切换为32位版本，或直接更改脚本打开方式为SysWOW64下的wscript.exe解决。若在ASP环境中，可重新注册ADODB.Stream组件或启用IIS应用程序池的32位模式。
火山引擎是字节跳动旗下企业级云与AI服务平台。聚焦大模型核心能力，依托字节自研豆包多模态大模型，凭借火山方舟一站式平台，提供模型精调、推理部署、智能应用搭建等全链路服务，结合高性能AI算力，助力各行业快速落地大模型数字化与智能化应用。
