无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站广告联系 微信:wuyouceo QQ:184822951
查看: 3084|回复: 3

批处理获取管理员权限各种写法

  [复制链接]
发表于 2017-11-19 21:35:47 | 显示全部楼层 |阅读模式
本帖最后由 comzhongwy 于 2017-12-28 11:25 编辑

你觉得哪种写法更好?

  1. @ECHO OFF
  2. setlocal ENABLEDELAYEDEXPANSION
  3. mode con: cols=65 lines=25
  4. color 0a

  5. :-------------------------------------  
  6. echo 检查管理员权限
  7. >NUL 2>&1 REG.exe query "HKU\S-1-5-19" || (
  8.     ECHO SET UAC = CreateObject^("Shell.Application"^) > "%TEMP%\Getadmin.vbs"
  9.     ECHO UAC.ShellExecute "%~f0", "%1", "", "runas", 1 >> "%TEMP%\Getadmin.vbs"
  10.     CSCRIPT //Nologo "%TEMP%\Getadmin.vbs"& DEL /f /q "%TEMP%\Getadmin.vbs" 2>NUL& Exit)
  11. pushd "%CD%"&& CD /D "%~dp0"
  12. :-------------------------------------  
  13. echo 检查 管理员权限...
  14. >NUL 2>&1 REG.exe query "HKU\S-1-5-19" || (
  15.     echo CreateObject^("Shell.Application"^).ShellExecute "%~f0", "%1", "", "runas", 1 > "%TEMP%\AdminRun.vbs"
  16.     echo CreateObject^("Scripting.filesystemobject"^).DeleteFile ^(WScript.ScriptFullName^) >> "%TEMP%\AdminRun.vbs"
  17.     CSCRIPT //Nologo "%TEMP%\Getadmin.vbs"& DEL /f /q "%TEMP%\Getadmin.vbs" 2>NUL& Exit)
  18. pushd "%CD%"&& CD /D "%~dp0"
  19. :--------------------------------------
  20. echo 检查管理员权限
  21. >nul 2>&1 %Windir%\System32\FLTMC.exe || (
  22.     ECHO SET UAC = CreateObject^("Shell.Application"^) > "%TEMP%\Getadmin.vbs"
  23.     ECHO UAC.ShellExecute "%~f0", "%1", "", "runas", 1 >> "%TEMP%\Getadmin.vbs"
  24.     CSCRIPT //Nologo "%TEMP%\Getadmin.vbs"& DEL /f /q "%TEMP%\Getadmin.vbs" 2>NUL& Exit)
  25. pushd "%CD%"&& CD /D "%~dp0"
  26. :-------------------------------------
  27. echo 检查 管理员权限...
  28. >nul 2>&1 dir "%WinDir%\system32\config" || (
  29.         set vbs=Set UAC ^= CreateObject(""Shell.Application""):^
  30.         UAC.ShellExecute ""%~0"", """", """", ""runas"", 1:window.close
  31.         mshta VBScript:Execute("%vbs%")&& exit)
  32. pushd "%CD%"&& CD /D "%~dp0"
  33. :-------------------------------------
  34. echo 检查 管理员权限...
  35. >nul 2>&1 dir "%WinDir%\system32\config" || (
  36. mshta VBScript:CreateObject("Shell.Application").ShellExecute("%~s0","goto :gotAdmin","","runas",1)(window.close)&& exit)
  37. pushd "%CD%"&& CD /D "%~dp0"
  38. :-------------------------------------
  39. echo 检查 管理员权限...
  40. %1 mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&& exit
  41. pushd "%CD%"&& CD /D "%~dp0"
  42. :-------------------------------------
  43. echo 检查 管理员权限...
  44. %1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&& exit
  45. pushd "%CD%"&& CD /D "%~dp0"
  46. :-------------------------------------

  47. ::以下为你的批处理内容

  48. pause
复制代码

发表于 2017-11-20 10:05:48 | 显示全部楼层
不明觉厉
回复

使用道具 举报

发表于 2017-11-21 21:23:53 | 显示全部楼层
楼主会vbs吗
回复

使用道具 举报

 楼主| 发表于 2017-12-28 05:09:07 | 显示全部楼层
你觉得哪种写法更好?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2024-3-29 05:35

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表