用RtlAdjustPrivilege来调整进程权限(VB6.0代码)
作者:admin 日期:2009-10-18
论坛上有朋友说起RtlAdjustPrivilege这个函数,就查了一下,写了个声明与调用示例出来,方便下次调用.
这个提权比RING3的那堆函数代码要少点,方便.......
复制内容到剪贴板
程序代码

Option Explicit
Private Declare Function RtlAdjustPrivilege Lib "ntdll.dll" ( _
ByVal Privilege As String, _
ByVal bEnable As Long, _
ByVal bCurrentThread As Long, _
ByRef bEnabled As Long) As Long
Private Const SE_DEBUG_PRIVILEGE As Long = 20
Private Sub Form_Load()
Dim I As Long
Debug.Print RtlAdjustPrivilege(SE_DEBUG_PRIVILEGE, 0, 0, I)
End Sub
Private Declare Function RtlAdjustPrivilege Lib "ntdll.dll" ( _
ByVal Privilege As String, _
ByVal bEnable As Long, _
ByVal bCurrentThread As Long, _
ByRef bEnabled As Long) As Long
Private Const SE_DEBUG_PRIVILEGE As Long = 20
Private Sub Form_Load()
Dim I As Long
Debug.Print RtlAdjustPrivilege(SE_DEBUG_PRIVILEGE, 0, 0, I)
End Sub
这个提权比RING3的那堆函数代码要少点,方便.......
评论: 3 | 引用: 0 | 查看次数: 1736


嗯。。。这个我也用过,之前写瞬间关机的程序时用过这个函数提权


进程的权限,代码里设置到了DEBUG级.


提的什么权限啊?