在Windows操作系统中，可以使用VBScript脚本将程序添加到开机启动项。以下是添加程序到开机启动项的步骤和示例代码：
步骤
创建一个VBScript文件
打开记事本或其他文本编辑器，输入以下代码：
```vbscript
Set fso = CreateObject（"Scripting.FileSystemObject"）
Set ws = CreateObject（"wscript.shell"）
' 获取要添加到开机启动的程序的路径
Dim programPath
programPath = InputBox（"请输入要添加到开机启动的程序路径："）
' 检查路径是否存在
If fso.FileExists（programPath） Then
' 获取当前用户的启动项键值
Dim runKey
runKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\" & fso.GetFileNameWithoutExtension（programPath）
' 检查该键值是否已存在
Dim existingValue
existingValue = ws.RegRead（runKey）
' 如果键值不存在，则添加新的启动项
If existingValue = "" Then
ws.RegWrite runKey, programPath, "REG_SZ"
MsgBox "程序已成功添加到开机启动项。"
Else
MsgBox "该程序已存在于开机启动项中，是否替换现有值？（Y/N）"
Dim response
response = InputBox（"Y表示替换，N表示不替换："）
If response = "Y" Then
ws.RegWrite runKey, programPath, "REG_SZ"
MsgBox "已替换现有值。"
End If
End If
Else
MsgBox "指定的程序路径不存在，请检查路径是否正确。"
End If
```
保存文件
将文件保存为`.vbs`扩展名，例如`add_to_startup.vbs`。
运行脚本
双击保存的VBScript文件，系统会提示输入要添加到开机启动的程序路径。
输入路径后，脚本会检查路径是否存在，并询问是否替换现有值（如果存在）。
根据提示操作，最终将程序添加到开机启动项。
注意事项
安全性：修改注册表时要小心，错误操作可能导致系统不稳定。建议先备份注册表或使用系统提供的备份功能。
权限：某些程序可能需要管理员权限才能修改开机启动项。
通过以上步骤和示例代码，你可以轻松地将程序添加到Windows的开机启动项中。