用RtlAdjustPrivilege来调整进程权限(VB6.0代码)

论坛上有朋友说起RtlAdjustPrivilege这个函数,就查了一下,写了个声明与调用示例出来,方便下次调用.

程序代码

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

这个提权比RING3的那堆函数代码要少点,方便.......

★VB部分相关文章推荐：★

☆VB 读写TXT文本文件函数

☆VB 提取TextBox 文本框中指定一行字符串

☆VB 使用SendMessage枚举文件与目录

☆VB 二进制数组与十六进制字符串相互转换

☆VB 二进制数据读写实例

☆VB 进制转换大全(十进制、十六进制、八进制、二进制、二进制流)互转

☆VB 实现UTF-8 与GB2312互转

☆VB 设置ListView中指定一行的背景颜色

☆VB SendMessage向其他程序窗口发送字符串消息实例

☆VB Listview导出到CSV文件函数

☆vb卸载所有窗体

☆VB中Null, Empty, Nothing, and vbNullString的区别

☆用RtlAdjustPrivilege来调整进程权限(VB6.0代码)

☆获取对象的接口信息(方法/属性/事件)(VB6代码)

☆[VB]SaveSetting 语句和 DeleteSetting 语句

☆VB APP对象属性一览表 + 灵活使用VB的APP对象

☆[vb]SendMessageA函数

☆使用VB绘制抛物线动画曲线

☆关于vb中的容器

☆[vb]利用WScript.Shell对象隐藏cmd命令行运行

☆浅析VB For Each.Next语句

☆VB中窗体模块、标准模块、类模块的区别

☆引用 VB类模块

☆VB中什么是类，类模块有什么作用

☆VB SendKeys 语句

☆VB 全局热键

☆用VB轻松调用其他程序

☆vb读取txt文件到textbox

☆如何去优化你的VB程序3

☆如何去优化你的VB程序2

☆如何去优化你的VB程序1

☆[VB]在状态栏中显示帮助信息

☆[VB]把屏幕保存为图像

☆Mp3Play.ocx控件让音乐之声响起来

用RtlAdjustPrivilege来调整进程权限(VB6.0代码)相关推荐

VB6监视/操作剪贴板示例(VB6.0代码)
剪贴板的监视,需要先使用SetClipboardViewer设置某个句柄为剪贴板查看器的一员. 然后当剪贴板发生改变时,系统就会向这个句柄发送WM_DRAWCLIPBOARD消息. 只要使用子类化拦截 ...
VB6.0代码中，有关字符串
1.字符串的连接运算符+和&的区别两种连接符都有使用,但有区别: 举例如下: (1)"&"是字符串连接符,如果不是字符串,将转化为字符串.但 & 前后要加 ...
RtlAdjustPrivilege 一行代码提升进程权限
前言:今天逆向一个非常实用的函数RtlAdjustPrivliege这个函数封装在NtDll.dll中(在所有DLL加载之前加载),被微软严格保密,就是说你在MSDN上查不到关于他的任何信息.先来看看 ...
修改进程权限(转载)
函数RtlAdjustPrivliege封装在NtDll.dll中(在所有DLL加载之前加载),被微软严格保密,就是说你在MSDN上查不到关于他的任何信息. 先来看看这个函数的定义(Winehq给出) ...
后台程序全局钩子获取鼠标滚轮滚动方向(VB6.0)
全局鼠标键盘HOOK封装: 封装了一个键盘鼠标HOOK类,使用方便(VB6.0) 需要增加的代码: '复制内容到剪贴板程序代码 Private Type MSLLHOOKSTRUCT ...
如何在VB6.0里动态使用具有事件的对象
代码如下: 'DLL内cTest内代码 Option Explicit '动态使用具有事件的对象 ' 'BY 嗷嗷叫的老马 'http://www.m5home.com Public Event KK ...
在VB6.0中怎么实现escape和unescape
两套方案,一是调用JAVAscript对象,二是自己写代码编码与解码,代码在CSDN中的以下帖子里贴出: 方案一代码: 复制内容到剪贴板程序代码 Function Escape(ByVal pstr ...
VB6.0操作WPS2019
以下VB6.0代码可以实现WPS2019个人免费版(不含VBA组件)的处理 Private Sub Command1_Click()Set xlApp = CreateObject("ket ...
Windows提升进程权限
Windows提升进程权限文章一: 在枚举/结束系统进程或操作系统服务时,会出现权限不足而失败的情况,这时就需要提升自己进程到系统权限,其实提升权限的代码很简单的,看过的最经典的应该是<WIN ...

用RtlAdjustPrivilege来调整进程权限(VB6.0代码)

用RtlAdjustPrivilege来调整进程权限(VB6.0代码)相关推荐

最新文章

热门文章