☰

將訊息新增至 Win7 登入畫面

tag-icon • tag-icon windows-7 windows windows-registry login
將訊息新增至 Win7 登入畫面

我正在按照教程進行操作這裡為了更改為登入螢幕，到目前為止它正在工作。不過，如果可以的話，我想要更多的功能。

我能夠顯示標題透過編輯以下註冊表​​項；

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System

legalnoticecaption

我還可以添加一個訊息透過編輯

legalnoticetext

我現在想要另一個注意說“這台計算機已被鎖定 x 分鐘」。

為了實現這一目標，我需要編輯/創建什麼？這可能嗎？

這樣做的原因是因為在我們的實驗室中，有些電腦被鎖定，使用者只是離開它們。他們會在 30 分鐘後註銷，但我想清楚地向其他路過的用戶顯示電腦被鎖定的時間。

答案1

直接說——這本身是不可能的。

然而！這也許可以透過腳本實現。

理論上，您可以編寫一小段 VBScript，透過讀取螢幕保護程式的啟動時間，每分鐘或每兩分鐘用新值更新註冊表項。

這位腳本專家貼文向您展示如何在螢幕保護程式啟動時閱讀。更新登錄項與「螢幕保護程式已運行 x 分鐘」。

這假設每次顯示法律聲明金鑰時都會被讀取 - 我目前沒有備用套件或時間進行測試，但它應該為您指明正確的方向。

可以將其設定為每兩分鐘運行一次的計劃任務。

它並不完全乾淨，但可以工作......只是。

嘗試類似的方法：

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process")

For Each objProcess in colProcesses
    If Right(objProcess.Name, 4) = ".scr" Then
        Wscript.Echo "Screen saver start time: " & DateDiff("n",WMIDateStringToDate(objProcess.CreationDate),now())
        'Set Registry Key to "x mins"
    End If
Next

Wscript.Echo "The screen saver is not running."
'Set Registry Key to "0 minutes"

Function WMIDateStringToDate(dtmStart)
    WMIDateStringToDate = CDate(Mid(dtmStart, 5, 2) & "/" & Mid(dtmStart, 7, 2) & "/" & Left(dtmStart, 4) & " " & Mid (dtmStart, 9, 2) & ":" & Mid(dtmStart, 11, 2) & ":" & Mid(dtmStart,13, 2))
End Function

相關內容