91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VBS和UAC如何實現帳戶控制

發布時間:2021-10-12 09:34:32 來源:億速云 閱讀:139 作者:小新 欄目:開發技術

這篇文章主要介紹了VBS和UAC如何實現帳戶控制,具有一定借鑒價值,感興趣的朋友可以參考下,希望大家閱讀完這篇文章之后大有收獲,下面讓小編帶著大家一起了解一下。

雖然很多人覺得這個功能很雞肋,但是以VBS的角度來看,UAC還是多多少少有點用的。在UAC的限制下,直接雙擊VBS文件只能在標準用戶權限下運行,很多事情是做不了的,比如復制自身到windows文件夾,或者寫入注冊表的開機啟動項等等。在XP下非常猖獗的暴風一號病毒,放到Win7下也就只能改改文件夾屬性為隱藏罷了,其他什么都做不了。當然了,一些不明真相的同學喜歡把UAC功能關掉,然后裝個叫什么359還是361的所謂安全軟件。我也不好多說什么,不然會遭到圍觀的。

雙擊VBS文件系統不會自動彈出UAC窗口是一個很大的問題,因為這大大限制了VBS的功能,很多事情都做不了,怎么解決呢?請看下面的代碼

代碼如下:


For Each objOS in GetObject("winmgmts:").InstancesOf("Win32_OperatingSystem")
If InStr(objOS.Caption,"XP") = 0 Then
If WScript.Arguments.length = 0 Then
Dim objShell
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "wscript.exe", Chr(34) & _
WScript.ScriptFullName & Chr(34) & " uac", "", "runas", 1
Else
Call Main()
End If
Else
Call Main()
End If
Next

Sub Main()
MsgBox "UAC demon"
End Sub


這是我根據這個網站的代碼改寫的,判斷系統版本,如果是XP(普通用戶一般都是XP,如果是2003的話請自己改寫)則直接運行代碼,否則調用Shell.Application對象的ShellExecute方法,以管理員權限運行腳本。這樣,我們的VBS程序在Vista/Win7系統下也可以像在XP系統那樣為所欲為了。

感謝你能夠認真閱讀完這篇文章,希望小編分享的“VBS和UAC如何實現帳戶控制”這篇文章對大家有幫助,同時也希望大家多多支持億速云,關注億速云行業資訊頻道,更多相關知識等著你來學習!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

玛沁县| 日照市| 博乐市| 瑞安市| 蓝田县| 云南省| 泰和县| 九台市| 武隆县| 金华市| 天等县| 梁山县| 易门县| 江华| 平舆县| 顺义区| 郧西县| 梁河县| 锦州市| 郯城县| 富阳市| 五大连池市| 新昌县| 蚌埠市| 天镇县| 天津市| 子洲县| 格尔木市| 罗平县| 余干县| 滁州市| 广宗县| 永平县| 武平县| 南阳市| 泗洪县| 博野县| 阳新县| 高台县| 平和县| 东源县|