提升进程权限模块

.如果真 (取操作系统类别 () ≠ 3)
返回 (假)
.如果真结束
.如果真 (是否为空 (目标进程))
hdlProcessHandle ＝ _获取线程 ()
.如果真结束
.如果真 (是否为空 (权限类别))
权限类别 ＝ #调试_
.如果真结束
_打开令牌 (hdlProcessHandle, 40, hdlTokenHandle)
_恢复权限 (“”, 权限类别, tmpLuid)
tkp.PrivilegeCount ＝ 1
tkp.lowpart ＝ tmpLuid.lowpart
tkp.highpart ＝ tmpLuid.highpart
tkp.Attributes ＝ 2
返回值 ＝ _获取令牌特权 (hdlTokenHandle, 0, tkp, 28, tkpNewButIgnored, 0)
CloseHandle (hdlTokenHandle)
易语言提升进程权限模块例子。