易语言服务器描述模块源码

系统结构:修改服务描述,打开SC管理服务_,关闭SC服务管理句柄_,API_OpenService,LockServiceDatabase,ChangeServiceConfig2,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 修改服务描述
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   打开SC管理服务_
           |  |
           |  |---[dll]------   关闭SC服务管理句柄_
           |  |
           |  |---[dll]------   API_OpenService
           |  |
           |  |---[dll]------   LockServiceDatabase
           |  |
           |  |---[dll]------   ChangeServiceConfig2

调用的DLL命令:

.DLL命令 打开SC管理服务_, 整数型, "advapi32.dll", "OpenSCManagerA", , ,
    .参数 机器名称, 文本型, , lpMachineName
    .参数 数据库名, 整数型, , lpDatabaseName
    .参数 数据库, 整数型, , dwDesiredAccess

.DLL命令 关闭SC服务管理句柄_, 整数型, "advapi32.dll", "CloseServiceHandle", , ,
    .参数 SC对象句柄, 整数型

.DLL命令 API_OpenService, 整数型, "advapi32.dll", "OpenServiceA", , 打开服务
    .参数 hSCManager, 整数型
    .参数 lpServiceName, 文本型
    .参数 dwDesiredAccess, 整数型

.DLL命令 LockServiceDatabase, 整数型, "advapi32.dll", "LockServiceDatabase"
    .参数 hSCManager, 整数型

.DLL命令 ChangeServiceConfig2, 整数型, "ADVAPI32.DLL", "ChangeServiceConfig2A"
    .参数 hService, 整数型
    .参数 dwInfoLevel, 整数型
    .参数 lpInfo, SERVICE_DESCRIPTION