转帖：使用脚本删除程序（免除在[控制面板]->[添加或删除程序]中的手工操作）

1. 代码：VBS

strComputer = "." '这个表示本地计算机
Set objWMIService = GetObject("winmgmts:" & " {impersonationLevel=impersonate}!\\" & strComputer & "\root \cimv2") '创建一个WMI对象

Set colSoftware = objWMIService.ExecQuery("Select * from Win32_Product Where Name = 'Personnel database'") ' 把Personnel database更换成你的程序的名字

if colSoftware <> null then
For Each objSoftware in colSoftware
objSoftware.Uninstall() '卸载
Next
end if

2. 操作: