ehxz 发表于 2020-11-21 08:56:07

运行时取得管理员权限



string ls_module
ls_module = space(255)

if handle(getapplication()) > 0 then
        if commandline <> "adminright" then
                GetModuleFileName(0,ref ls_module,255)
                ShellExecute(0,"runas",ls_module,"adminright",0,1)
                return
        end if
else
        MessageBox("","请编译成 exe 再运行本程序,自动取得管理员权限")
        return
end if


open(w_main)

自来QQ群苏州熊猫

lian_yi 发表于 2020-12-9 09:10:01

高版本的PB管用吗?

shun4132175 发表于 2023-7-27 15:37:09

希望可以使用
页: [1]
查看完整版本: 运行时取得管理员权限

免责声明:
本站所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Admin@SybaseBbs.com