【vbs常用代码】VBScript（简称VBS）是一种由微软开发的脚本语言，常用于Windows系统中的自动化任务，如文件操作、注册表修改、系统信息获取等。虽然随着PowerShell的普及，VBS的使用频率有所下降，但在一些旧系统或特定场景中仍具有实用价值。以下是一些VBScript的常用代码示例，帮助用户快速掌握其基本用法。
一、常用功能总结
| 功能 | 说明 | 示例代码 |
| 显示消息框 | 弹出一个提示窗口 | `MsgBox "Hello, World!"` |
| 获取系统时间 | 显示当前日期和时间 | `MsgBox Now` |
| 创建文本文件 | 在指定路径创建并写入文本 | `Set fso = CreateObject("Scripting.FileSystemObject")` `Set file = fso.CreateTextFile("C:\test.txt", True)` `file.WriteLine("这是测试内容")` `file.Close` |
| 读取文本文件 | 读取指定文件的内容 | `Set fso = CreateObject("Scripting.FileSystemObject")` `Set file = fso.OpenTextFile("C:\test.txt", 1)` `MsgBox file.ReadAll` `file.Close` |
| 删除文件 | 删除指定路径的文件 | `Set fso = CreateObject("Scripting.FileSystemObject")` `fso.DeleteFile "C:\test.txt"` |
| 获取系统信息 | 获取计算机名、操作系统等信息 | `Set objWMIService = GetObject("winmgmts:\\.")` `Set colItems = objWMIService.ExecQuery("SELECT FROM Win32_ComputerSystem")` `For Each objItem In colItems` `MsgBox objItem.Manufacturer & " " & objItem.Model` `Next` |
| 运行程序 | 启动外部程序或命令 | `CreateObject("Wscript.Shell").Run "notepad.exe"` |
| 修改注册表 | 添加或修改注册表项 | `Set reg = CreateObject("WScript.Shell")` `reg.RegWrite "HKCU\Software\TestKey\", "TestValue", "REG_SZ"` |
二、注意事项
- 权限问题：某些操作（如修改注册表、删除系统文件）需要管理员权限才能执行。
- 安全性：由于VBS脚本可以执行任意命令，建议在受信任环境中运行。
- 兼容性：VBS在Windows系统中广泛支持，但在其他操作系统上无法直接运行。
通过以上代码示例，可以快速实现常见的系统自动化任务。对于初学者来说，建议从简单的消息框和文件操作开始，逐步深入学习更复杂的脚本逻辑。同时，结合实际需求，合理使用VBS可以大大提高工作效率。
