关于VB6.0 调用API的问题
发布网友
发布时间：2022-04-26 21:28
共2个回答
热心网友
时间：2023-11-04 22:10
ExitwindowsEx Windows关机函数
最常用
ExitWindowsEx(EWX_SHUTDOWN, 0);
ExitWindowsEx(EWX_REBOOT, 0);
其他参数：
EWX_FORCE
EWX_LOGOFF
EWX_POWEROFF
windows95/98/me中直接调用就可以了
ExitWindowsEx(EWX_SHUTDOWN, 0); //关机
ExitWindowsEx(EWX_REBOOT, 0); //重启
Windows NT/2000 及后续版本则有安全性要求，程序必须拥有SE_SHUTDOWN_NAME权限才能成功调用ExitwindowsEx
要提高权限就要使用AdjustTokenPrivileges
提高本进程权限代码：
HANDLE hToken;
TOKEN_PRIVILEGES tkp,tkpNew;
LUID intLpUid;
OpenProcessToken(GetCurrentProcess(),TOKEN_ADJUST_PRIVILEGES|TOKEN_QUERY,&hToken)
LookupPrivilegeValue(NULL,"SeShutdownPrivilege",&intLpUid);
tkp.PrivilegeCount=1;
tkp.Privileges[0].Liud=intLpUid;
tkp.Privileges[0].Attributes=SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken,FALSE,&tkp,sizeof(tkp),&tkpNew,&dwSize);
Windows NT/2000 关机函数
BOOL MySystemShutdown()
{
HANDLE hToken;
TOKEN_PRIVILEGES tkp;
// Get a token for this process.
if (!OpenProcessToken(GetCurrentProcess(),
TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken))
return( FALSE );
// Get the LUID for the shutdown privilege.
LookupPrivilegeValue(NULL, SE_SHUTDOWN_NAME,
&tkp.Privileges[0].Luid);
tkp.PrivilegeCount = 1; // one privilege to set
tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
// Get the shutdown privilege for this process.
AdjustTokenPrivileges(hToken, FALSE, &tkp, 0,
(PTOKEN_PRIVILEGES)NULL, 0);
if (GetLastError() != ERROR_SUCCESS)
return FALSE;
// Shut down the system and force all applications to close.
if (!ExitWindowsEx(EWX_SHUTDOWN | EWX_FORCE, 0))
return FALSE;
return TRUE;
}
热心网友
时间：2023-11-04 22:11
在Win 2000/XP下调用ExitWindowsEx函数时，还需要先调用AdjustTokenPrivileges函数。
参考资料：http://zhidao.baidu.com/question/37263.html
