SvcMgr ＝ 打开SC管理服务_ (0, 0, #SC_MANAGER_ALL_ACCESS) ' 983103
.如果真 (SvcMgr ≠ 0)
Svc ＝ 打开服务_ (SvcMgr, 服务名称.内容, #SERVICE_ALL_ACCESS) ' 983551
.如果真 (Svc ≠ 0)
.如果 (编辑框2.内容 ≠ “”)
SERVICE.lpDescription ＝ 编辑框2.内容
锁定服务数据库_ (Svc)
result ＝ 更改服务配置_ (Svc, 1, SERVICE) ' SERVICE_CONFIG_DESCRIPTION
.否则
信息框 (“描述不能为空！”, 0, )
.如果结束
关闭SC服务管理句柄_ (Svc)
.如果真结束
关闭SC服务管理句柄_ (SvcMgr)
上一篇 超级列表框鼠标多选操作模块
下一篇 软件添加QQ群验证功能