代码检测是否使用管理员身份运行源码+模块

吃饱等天黑 · 发表于 2020-12-8 19:11:37

6666666666666666

CubeFox · 发表于 2020-9-5 21:26:15

谢谢分享！！！

柠檬Sir · 发表于 2020-5-15 08:10:12

7666666666不错

我是床奇 · 发表于 2019-12-21 08:15:19

谢谢楼主的分享

jyltlqy86101587 · 发表于 2019-6-22 03:33:26

3444444444444

淘气小阿飞 · 发表于 2019-6-6 15:42:01

不错！！！！！！！！！

lancehax · 发表于 2019-6-1 13:46:02

试试看？试试看？

Visitor雅轩 · 发表于 2019-5-17 21:14:24

.版本 2

.局部变量 WinVer, 短整数型
.局部变量 hToken, 整数型
.局部变量 te, TOKEN_ELEVATION
.局部变量 dwReturnLength, 整数型
.局部变量 bIsElevated, 逻辑型
.局部变量 Bin, 字节集

WinVer ＝ LOWORD (GetVersion ())  ' 获取Windows 版本
Bin ＝到字节集 (WinVer)
WinVer ＝ Bin [1]
Bin [1] ＝ Bin [2]
Bin [2] ＝ WinVer
WinVer ＝取字节集数据 (Bin, #短整数型, )
.如果真 (WinVer ＜ 1536)  ' 如果当前系统木有以管理员身份运行介个功能
返回 (假)
.如果真结束
.如果真 (OpenProcessToken (GetCurrentProcess (), #TOKEN_QUERY, hToken) ≠ 0)  ' 打开访问令牌
GetTokenInformation (hToken, #TokenElevation, te, 4, dwReturnLength)  ' 获取令牌信息
.如果真 (dwReturnLength ＝ 4)
      bIsElevated ＝ te.TokenIsElevated ≠ 0
.如果真结束
CloseHandle (hToken)  ' 关闭句柄
.如果真结束
返回 (bIsElevated)

这是精易的代码

Hooksafe · 发表于 2019-5-12 13:42:08

精易模块
系统_是否为管理员 () 判断当前程序是否在管理员模式下运行，是返回真，否返回假。
水贴！

Cydias · 发表于 2019-5-2 18:18:57

感谢分享！支持开源！

		自动登录	找回密码
密码			注册

[易语言纯源码] 代码检测是否使用管理员身份运行 源码+模块

[易语言纯源码] 代码检测是否使用管理员身份运行源码+模块