2015年11月23日星期一

vb快速關機

轉自 http://fecbob.pixnet.net/blog/post/38138899-vb快速關機

Function RtlAdjustPrivilege& Lib "ntdll" (ByVal Privilege&, ByVal NewValue&, ByVal NewThread&, OldValue&)

Public Declare Function NtShutdownSystem& Lib "ntdll" (ByVal ShutdownAction&)

Public Const SE_SHUTDOWN_PRIVILEGE& = 19

Public Const shutdown& = 0

Public Const RESTART& = 1

Public Const POWEROFF& = 2

'過程

Sub TurboShutdown()

RtlAdjustPrivilege SE_SHUTDOWN_PRIVILEGE, 1, 0, 0

NtShutdownSystem shutdown '關機

'NtShutdownSystem restart '重啟動

'NtShutdownSystem poweroff '待機

End Sub

Private Sub Command1_Click()'按鈕1

'調用

Call TurboShutdown

End Sub

=================================================

轉自 http://knowlet3389.blogspot.tw/2013/07/source-shutdownexe.html

VB6 因為要手動宣告所以比較麻煩點...

Option Explicit

Private Declare Function OpenProcessToken Lib "advapi32.dll" (ByVal ProcessHandle As Long, ByVal DesiredAccess As Long, TokenHandle As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Declare Function LookupPrivilegeValueA Lib "advapi32.dll" (ByVal lpSystemName As String, ByVal lpName As String, lpLuid As LUID) As Long
Private Declare Function AdjustTokenPrivileges Lib "advapi32.dll" (ByVal TokenHandle As Long, ByVal DisableAllPrivileges As Long, NewState As TOKEN_PRIVILEGES, ByVal BufferLength As Long, PreviousState As TOKEN_PRIVILEGES, ReturnLength As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Private Const TOKEN_ADJUST_PRIVILEGES = &H20
Private Const TOKEN_QUERY = &H8
Private Const SE_PRIVILEGE_ENABLED = &H2
Private Const ANYSIZE_ARRAY = 1

Private Type LUID
    lowpart As Long
    highpart As Long
End Type

Private Type LUID_AND_ATTRIBUTES
    pLuid As LUID
    Attributes As Long
End Type

Private Type TOKEN_PRIVILEGES
    PrivilegeCount As Long
    Privileges(ANYSIZE_ARRAY) As LUID_AND_ATTRIBUTES
End Type

Private Const EWX_FORCE = 4
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_LOGOFF = 0

Private Sub Command1_Click()
    Dim hdl As Long
    Dim uid As LUID
    Dim ptoken As TOKEN_PRIVILEGES
    Dim PreviousState As TOKEN_PRIVILEGES
    Dim ReturnLength As Long
    
    OpenProcessToken GetCurrentProcess, (TOKEN_ADJUST_PRIVILEGES Or TOKEN_QUERY), hdl
    LookupPrivilegeValueA "", "SeShutdownPrivilege", uid
    ptoken.PrivilegeCount = 1
    ptoken.Privileges(0).pLuid = uid
    ptoken.Privileges(0).Attributes = SE_PRIVILEGE_ENABLED
    AdjustTokenPrivileges hdl, False, ptoken, Len(PreviousState), PreviousState, ReturnLength
    CloseHandle hdl
    ExitWindowsEx EWX_SHUTDOWN Or EWX_FORCE, 0
End Sub

以上源碼皆已在 Win7 x86 測試完成。

==========================================================
可能參數不對.
EWX_FORCE = 4 ' 強制關機
EWX_LOGOFF = 0 ' 登出
EWX_REBOOT = 2 ' 重開機
EWX_SHUTDOWN = 1 ' 關機
EWX_POWEROFF = 8 ' 關機 ---> 2k , XP
ExitWindowsEx (EWX_POWEROFF ), 65535

=================================================

轉自 http://www.eng.uwaterloo.ca/~kwlau/api/shutdown9x.shtml

Win9x(95/98/Me) 關機方法

要把Win95/98/Me 關機，可以用API "ExitWindowsEx"

宣告法是：Declare Function ExitWindowsEx Lib "user32.dll" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

使用方法︰準備三個Command button

Private Const EWX_FORCE As Long = 4 '用作強制強制關機/重新開機/登出
Private Const EWX_LOGOFF As Long = 0 '登出
Private Const EWX_REBOOT As Long = 2 '重新開機
Private Const EWX_SHUTDOWN As Long = 1 '關機

Private Declare Function ExitWindowsEx Lib "user32.dll" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Private Sub Form_Load()
Command1.Caption = "Logoff"
Command2.Caption = "reboot"
Command3.Caption = "shutdown"
End Sub

Private Sub Command1_Click()
ExitWindowsEx EWX_LOGOFF, 0 '登出
End Sub

Private Sub Command2_Click()
ExitWindowsEx EWX_FORCE Or EWX_REBOOT, 0 '強制重新開機
End Sub

Private Sub Command3_Click()
ExitWindowsEx EWX_FORCE Or EWX_SHUTDOWN, 0 '強制關機
End Sub

備註︰配合EWX_FORCE 參數可以強制關機/重新開機/登出

================================================

轉自 http://www.xker.com/page/e2007/0201/22164.html

如何在VB中终止Windows系统

在Visual Basic 程序中，可以使用Windows API 函数来重新启动计算机系统，文本介绍如何退出Windows 并关闭计算机系统。

关闭计算机系统

　　可以使用Windows API 的ExitWindowsEx 函数来从Visual Basic 程序中重新启动计算机系统。要使用该函数，需要将如下声明语句包含在窗体的通常声明部分中：

　　 Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

　　 ExitWindowsEx 函数需要2 个参数，可以使用一个或多个下面的标识的组合来告诉ExitWindowsEx 函数希望进行关机过程。

　　 EWX_FORCE 所有的进程都被强制终止。

　　 EWX_LOGOFF 所有的进程被强制终止，并且用户退出登录（logged off）。

　　 EWX_POWEROFF 计算机系统被关机，并且如果支持节电特性，则计算机被物理关机。

　　 EWX_REBOOT 计算机系统被关机并重新启动。

　　 EWX_SHUTDOWN 计算机被物理地安全地关机。

　　下面的样例程序中使用了上面的三个标识的组合。该标识组合（EWX_LOGOFF，EWX_FORCE，以及EWX_REBOOT）告诉Windows 退出所有正在执行的进程，使用户退出网络登录，使计算机系统处于准备状态以供用户关机。

样例程序

　　该样例程序显示了如何关闭计算机系统。

　　 1. 在Visual Basic 中开始一个新的项目，采用缺省的方法建立Form1。

　　 2. 将如下常量和声明语句添加到Form1 的通常声明部分中（注意该声明语句需要书写在一行内）：

Private Declare Function ExitWindowsEx Lib "user32"
(ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Const EWX_POWEROFF = 8
Const EWX_RESET = EWX_LOGOFF + EWX_FORCE + EWX_REBOOT

　　 3. 在Form1 上添加一个命令按钮控件，采用缺省的方法建立Comand1。将它的Caption 属性设置为“ 重新启动计算机”。

　　 4. 将如下代码添加到Command1 的单击事件中：

Private Sub Command1_Click()
Dim X As Long
X = ExitWindowsEx(EWX_RESET, dwReserved)
End Sub

　　按下F5 来运行上述样例程序，单击命令按钮，即可重新启动计算机系统。

=================================================

轉自 http://m.myexception.cn/vb/128504.html

如何用 VB6.0 代码关闭 Windows XP 系统

怎么用 VB6.0 代码关闭 Windows XP 系统？
大家好！

怎么用 VB6.0 代码关闭 Windows XP 系统？
谢谢!

------解决方案--------------------
在公共标准模块中声明WIN API：
Public Declare Function ExitWindowsEx Lib "user32 " (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

在按钮事件中用如下代码可关机：
Private Sub Command1_Click()
ExitWindowsEx 1, 0
End Sub

在按钮事件中用如下代码可重启：
Private Sub Command1_Click()
ExitWindowsEx 2, 0
End Sub

------解决方案--------------------
<98 下的代码>

Private Declare Function ExitWindows Lib "user32 " (ByVal dwReserved As Long, ByVal uReturnCode As Long) As Long

Private Const EWX_LOGOFF = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2
Private Const EWX_FORCE = 4

Private Sub execute(op as string)
Select Case op
Case "关机 "
ExitWindows EWX_SHUTDOWN, 0
Case "重启 "
ExitWindows EWX_REBOOT, 0
Case "注销 "
ExitWindows EWX_LOGOFF, 0
End Select
End Sub

==============================================================================

<2000 和 xp 下的代码>

Private Declare Function ExitWindowsEx Lib "user32 " (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32 " () As Long
Private Declare Function LookupPrivilegeValue Lib "advapi32.dll " Alias "LookupPrivilegeValueA " (ByVal lpSystemName As String, ByVal lpName As String, lpLuid As LUID) As Long
Private Declare Function AdjustTokenPrivileges Lib "advapi32.dll " (ByVal TokenHandle As Long, ByVal DisableAllPrivileges As Long, NewState As TOKEN_PRIVILEGES, ByVal BufferLength As Long, PreviousState As TOKEN_PRIVILEGES, ReturnLength As Long) As Long
Private Declare Function OpenProcessToken Lib "advapi32.dll " (ByVal ProcessHandle As Long, ByVal DesiredAccess As Long, TokenHandle As Long) As Long

Private Const ANYSIZE_ARRAY = 1 '--------AT
Private Const TOKEN_ADJUST_PRIVILEGES = &H20 '--------AT
Private Const TOKEN_QUERY = &H8 '--------AT
Private Const SE_PRIVILEGE_ENABLED = &H2 '--------AT

Sub AdjustToken()
Dim hdlProcessHandle As Long
Dim hdlTokenHandle As Long
Dim tmpLuid As LUID
Dim tkp As TOKEN_PRIVILEGES
Dim tkpNewButIgnored As TOKEN_PRIVILEGES
Dim lBufferNeeded As Long
hdlProcessHandle = GetCurrentProcess()
OpenProcessToken hdlProcessHandle, (TOKEN_ADJUST_PRIVILEGES Or TOKEN_QUERY), hdlTokenHandle
LookupPrivilegeValue " ", "SeShutdownPrivilege ", tmpLuid
tkp.PrivilegeCount = 1 ' One privilege to set
tkp.Privileges(0).pLuid = tmpLuid
tkp.Privileges(0).Attributes = SE_PRIVILEGE_ENABLED
'Get the LUID for shutdown privilege.

AdjustTokenPrivileges hdlTokenHandle, False, tkp, Len(tkpNewButIgnored), tkpNewButIgnored, lBufferNeeded
'Enable the shutdown privilege in the access token of this process.
End Sub

Private Sub execute(op as string) '--------AT
Call AdjustToken

Select Case op
Case "注销 "
ExitWindowsEx EWX_LOGOFF, 0
Case "关闭 "
ExitWindowsEx EWX_SHUTDOWN, 0
Case "重启 "
ExitWindowsEx EWX_REBOOT, 0
Case "强制关闭 "
ExitWindowsEx EWX_FORCE, 0
End Select

End Sub

------解决方案--------------------
Option Explicit

Public Declare Function ExitWindowsEx Lib "user32 " (ByVal uFlags As Long, _
ByVal dwReserved As Long) As Long

Enum HowExitConst
EWX_FORCE = 4 ' 强制关机
EWX_LOGOFF = 0 ' 登出
EWX_REBOOT = 2 ' 重开机
EWX_SHUTDOWN = 1 ' 关机
EWX_POWEROFF = 8
End Enum

Const TOKEN_ADJUST_PRIVILEGES = &H20
Const TOKEN_QUERY = &H8
Const SE_PRIVILEGE_ENABLED = &H2
Const ANYSIZE_ARRAY = 1

Private Type LUID
lowpart As Long
highpart As Long
End Type

Private Type LUID_AND_ATTRIBUTES
pLuid As LUID
Attributes As Long
End Type

Private Type TOKEN_PRIVILEGES
PrivilegeCount As Long
Privileges(ANYSIZE_ARRAY) As LUID_AND_ATTRIBUTES
End Type

Private Declare Function GetCurrentProcess Lib "kernel32 " () As Long
Private Declare Function LookupPrivilegeValue Lib "advapi32.dll " Alias _
"LookupPrivilegeValueA " (ByVal lpSystemName As String, _
ByVal lpName As String, lpLuid As LUID) As Long
Private Declare Function AdjustTokenPrivileges Lib "advapi32.dll " _
(ByVal TokenHandle As Long, ByVal DisableAllPrivileges As Long, _
NewState As TOKEN_PRIVILEGES, ByVal BufferLength As Long, _
PreviousState As TOKEN_PRIVILEGES, ReturnLength As Long) As Long
Private Declare Function OpenProcessToken Lib "advapi32.dll " _
(ByVal ProcessHandle As Long, ByVal DesiredAccess As Long, _
TokenHandle As Long) As Long

Public Sub AdjustToken()
'因为 98以上的机器存在一个安全机制的问题这个就是处理安全机制问题的代码

Dim hdlProcessHandle As Long
Dim hdlTokenHandle As Long
Dim tmpLuid As LUID
Dim tkp As TOKEN_PRIVILEGES
Dim tkpNewButIgnored As TOKEN_PRIVILEGES
Dim lBufferNeeded As Long
hdlProcessHandle = GetCurrentProcess()
OpenProcessToken hdlProcessHandle, (TOKEN_ADJUST_PRIVILEGES Or TOKEN_QUERY), _
hdlTokenHandle
LookupPrivilegeValue " ", "SeShutdownPrivilege ", tmpLuid
tkp.PrivilegeCount = 1
tkp.Privileges(0).pLuid = tmpLuid
tkp.Privileges(0).Attributes = SE_PRIVILEGE_ENABLED

AdjustTokenPrivileges hdlTokenHandle, False, tkp, Len(tkpNewButIgnored), _
tkpNewButIgnored, lBufferNeeded
End Sub

Private Sub Label1_Click(Index As Integer)
'该代码可以关闭所以的windows系统
Select Case Index
Case 0
AdjustToken
Call ExitWindowsEx(EWX_LOGOFF, 0) '注销
End
Case 1
AdjustToken
Call ExitWindowsEx(EWX_POWEROFF, 0) '对付98不能关机
Call ExitWindowsEx(EWX_SHUTDOWN, 0) '关机
End
Case 2
AdjustToken
Call ExitWindowsEx(EWX_REBOOT, 0) '重启
End
Case 3
Unload Me
'取消
End Select

End Sub

2015年11月22日星期日

Windows 10 系統如何進入安全模式？

轉自 http://steachs.com/archives/14924

首先直接在搜尋處打入「重設此電腦」，找到後點擊進入。

如果你不想要經過複雜的步驟，簡單一點的話也可以參考這一篇，指令同樣可以在搜尋框裡直接輸入，方式各有不同，但都不是很方便，提供給大家參考。

然後在復原裡，點擊進階啟動的立即重新啟動，這個步驟不用擔心，不是真的要復原電腦，只是得從這裡進到開機選單。

然後就重開機囉。

進入到疑難排解。

再進到進階選項。

點擊右邊的啟動設定。

不囉嗦直接再按重新啟動。

恭喜你到了最後一步，安全模式一共有三種分別是按 F4、F5 或 F6，依你的需求選擇吧。

然後就會看到你可愛的安全模式了，如果要回到正常的桌面，只要再重開機就可以了。

透過「電源配置」簡單設定就能節能減碳救地球!

轉自 http://www.netqna.com/2014/04/saving-electricity.html

2010年開始新聞就不斷的報出世界各地所發生的天災，而且天災的頻率是非常密集的，我想這應該是全球暖化造成世界各地天災不斷，最近發現不管是網站、部落格還是Email轉寄，都有在發佈響應環保的活動，前一陣子透過Email的轉寄，就有看到一篇還不錯的文章【電腦月省420元電費交大撇步得獎】。

要讓電腦月省420元電費，其實設定上很簡單，主要是透過Windows XP內建的「電源配置」就可以達成，首先，進入電腦系統裡的【控制台】再進入裡面的【電源選項】最後進入【電源配置】將【關閉監視器】的時間設定成5分鐘，接著將【系統待命】的時間設定成10分鐘，再將【關閉硬碟】的時間設定成15分鐘，最後再將【系統休眠】的時間設定成20分鐘，即大功告成。電腦閒置20分鐘，自動進入休眠狀態，省電 97.5％，而以交大學生的算法，主機加上螢幕300瓦耗電，1天16小時計算，1個月一台電腦可省140度電，平均1個月可省下420元電費嘍。

但每個人的使用習慣及開電腦的時數都不一樣，所以這420元也只是一個參考值而已，不過最重要的是透過簡單設定就能節能減碳「愛地球」和樂而不為呢? 如果每個人都能節省一點，相信加起來的力量是驚人的。

可是在我們公司裡，因為權限的關係，只有Administrator可以修改「電源配置」的選項，一般user不能改，而「電源配置」又是跟著使用者設定走，就算不是跟著使用者設定，我們電腦數大約也在150台左右，如果要一台一台設定，應該會設定到死掉吧XD，所以就只能從群組原則(GPO)下手首先先建立一個GPO在【電腦設定】【Windows設定】【登錄】右鍵(新增機碼)《將權限開給USER》

MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\ControlsFolder\PowerCfg (電源管理設定為everyone可修改)
MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Power(電源管理設定為everyone可修改)
USERS\.DEFAULT\Control Panel\PowerCfg(電源管理設定為everyone可修改)

再來要在GPO裡修改一隻程式的權限（如下圖）

在【電腦設定】【Windows設定】【檔案系統】右鍵(新增檔案)《將權限開給USER》

%SystemRoot%\system32\powercfg.cpl (電源管理設定為everyone可修改)
%SystemRoot%\system32\powercfg.exe (電源管理設定為everyone可修改)

接著，設定慢速網路登入，確保USER登入後能套用原則

在【電腦設定】【系統管理範本】【系統】【群組原則】《啟用群組原則低速連結偵測》

在【電腦設定】【系統管理範本】【系統】【登入】

《啟用在電腦啟動及登入時要等待網路啟動》

以上動作，已經可以讓一般沒權限的USER，開機登入後有電源配置的修改權限，接下來就是寫一個讓使用者在開機的時候自動將設定給套入的批次檔。

開啟記事本將下面文字複製貼上並另存新檔，檔名為hibernate.bat(如下圖)

(設定為正在使用中模式)
powercfg /setactive 「家用/辦公室桌上型"
(將此模式"關閉監視器時間"設定為5分鐘)
powercfg /change 「家用/辦公室桌上型" /monitor-timeout-ac 5
(將此模式"關閉硬碟"關閉)
powercfg /change 「家用/辦公室桌上型" /disk-timeout-ac 0
(將此模式"待命時間"設定為10分鐘)
powercfg /change 「家用/辦公室桌上型" /standby-timeout-ac 10
(將此模式"結束待命後需輸入密碼設定off on為需要輸入")
powercfg /globalpowerflag off /option:resumepassword
(將休眠功能on off為關閉)
powercfg /hibernate on
(將此模式"休眠時間"設定為0分鐘）
powercfg /change 「家用/辦公室桌上型" /hibernate-timeout-ac 0

檔案存檔後在到GPO的【使用者設定】【Windows設定】【指令碼】【登入】點兩下

點選【顯示檔案】將剛剛存檔的批次檔hibernate.bat給複製進去

在按【新增】【瀏覽】選hibernate.bat

這樣就大功告成了

最後整理了一下Windows 中休眠、關機、待命和登出的差別給大家參考

休眠

休眠只是將記憶體的資料先儲存到硬碟裡，像是作業系統的驅動程式、週邊、程式執行狀態等，然後將硬碟讀寫頭歸位，螢幕輸出關閉，進入休眠模式，降低整台電腦的耗電量，下一次喚醒系統時，系統只要從硬碟將儲存的資料還原到記憶體上，即可正常繼續使用，而不像作業系統開機時要載入驅動程式等其他的程式，所以會快很多。長久使用，多少會傷到硬碟.比較常碰到的問題是電腦一休眠就變成睡電腦…一睡不起…最後只能整台電腦重開=_="

待命

待命模式會切斷目前未使用的硬體元件的供電，降低電腦耗電量。雖然待命模式可以切斷對周邊裝置、螢幕甚至硬碟的供電，但會持續對電腦記憶體供電，這樣您的工作就不會遺失。

關機

作業系統會關閉所有在執行的程式跟資料夾，並且儲存這次開機所做的所有設定之後，自動關閉電腦。

以上教學雖然可以節省不少電力，但畢竟休眠或待命電腦都是開機的狀態，或多或少都會吃些電力，而為了避免下班時間同仁沒有將電腦關閉，所以另外這邊也順便貼出Windows自動關機排程程式。

@echo off

echo shutdown.exe -s -f -t 120 -c "電腦即將在 2 分鐘後自動關機，若想取消關機請執行 shutdown -a" >%windir%\system32\shutdown.bat

Wmic OS Get Caption|Find /i "Windows XP">nul&&set winVer=XP

Wmic OS Get Caption|Find /i "Windows 7">nul&&set winVer=Win7

if %winVer% == XP at 22:00 /every:日,一,二,三,四,五,六 "%windir%\system32\shutdown.bat"

if %winVer% == Win7 at 22:00 /every:M,T,W,Th,F,S,Su "%windir%\system32\shutdown.bat"

echo.

echo 已將『定時自動關機』加入排程，每天的 23:00 將會自動關機。

echo 詳細內容請參考 [控制台] 中的 [排定的工作]

echo.

echo

echo

echo.

echo.

pause

登出

是一種帳戶控管的概念。在一台電腦內，建立一或多個使用者帳戶，每個帳戶都能保有自己的設定(ex：桌面圖片、記憶密碼..等)。當要換人使用時，"登出"就可以把目前自己設定的帳戶關閉，讓其它人登入自己的帳戶以自己的設定使用電腦。

群組原則設定「電源配置」方法

轉自 http://p1114kimo.pixnet.net/blog/post/18834041-%5B資訊%5D-群組原則設定「電源配置」方法

再來要在GPO裡修改一隻程式的權限（如下圖）

在【電腦設定】【Windows設定】【檔案系統】《將權限開給USER》
1.%SystemRoot%\system32\powercfg.cpl (電源管理設定為everyone可修改)2.%SystemRoot%\system32\powercfg.exe (電源管理設定為everyone可修改)

接著，設定慢速網路登入，確保USER登入後能套用原則

在【電腦設定】【系統管理範本】【群組原則】《啓用群組原則低速連結偵測》

在【電腦設定】【系統管理範本】【系統】【登入】
《啓用在電腦啓動及登入時要等待網路啓動》

以上動作，已經可以讓一般沒權限的USER，開機登入後有電源配置的修改權限

不過【休眠】這個選項還是無法修改，但沒關係～～

因為一般公司實在不應該讓電腦休眠，雖然比待命省電，但啓動時間花的太長

反而影響工作效率和員工的情緒，所以呢～我沒去研究怎麼開放它

再來就是，公司電腦有一百台以上的電腦耶，當然不會一台一台去管去設定

所以，我在開機登入檔設了一個 .bat　讓USER登入後，自動去設定
（.bat是放在USER帳號內容那邊，應該不用再說明）

powercfg /setactive "家用/辦公室桌上型"1.(設定為正在使用中模式)

powercfg /change "家用/辦公室桌上型" /monitor-timeout-ac 52.(將此模式"關閉監視器時間"設定為5分鐘)

powercfg /change "家用/辦公室桌上型" /disk-timeout-ac 03.(將此模式"關閉硬碟"關閉)

powercfg /change "家用/辦公室桌上型" /standby-timeout-ac 10
4.(將此模式"待命時間"設定為10分鐘)

powercfg /globalpowerflag off /option:resumepassword
5.(將此模式"結束待命後需輸入密碼設定off on為需要輸入")

powercfg /hibernate off
6.(將休眠功能off on為啓動)

powercfg /change "家用/辦公室桌上型" /hibernate-timeout-ac 07.(將此模式"休眠時間"設定為0分鐘）
以上有問題的是，休眠功能一樣無修改權限…所以加入了第7點來控制休眠不啓用當然，也有人會問，權限都沒管了，USER可以一直改回來就好了啊！在這裡我要講，節能應該是從自身的觀念做起，自己如果有這個心，

做什麼都能省，如果沒這個心，一樣會這邊省一塊，另一邊浪費十塊堅持不開放給USER的話，就是設定完，再把GPO那邊關閉即可

或有一套軟體叫做　EZ_GPO　這是可以完整管理的，大家也可以參考看看

補充：
下面留言回覆有其他網友的建議和問題，請記得往下看完參考。

權限設定

小弟今天也剛剛完成設定，不過稍有不同，提出來供大家參考：
registry的權限只需要設定MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\ControlsFolder\
PowerCfg給users有查詢數值、設定數值、建立子機碼及列舉子機碼等權限就好，其餘的registry及檔案都維持原狀，就可以使用powercdf.exe來設定了

本機電腦原則->電腦設定->Windows設定->安全性設定->本機原則->使用者權利指派->系統關機，把Everyone給加入！

訂閱：文章 (Atom)

2015年11月23日 星期一