1。プログラム関数の紹介:
このプログラムは、VBS+HTAに基づいて書かれています。テストはXPシステムの下で渡されました(異なるディスプレイ、解像度)。
1.このプログラムは、主にUディスクフォルダーの非表示属性を削除する機能を使用します。最初にユーザープロセス(ウイルスプロセスを含む)を終了し、ウイルスによって隠されたフォルダーを削除し、フォルダーと同じ名前のExeウイルスファイルのコピーを削除できます。
2。補助関数:
opention入力メソッド設定、サウンド設定、システム構成プログラムなどの一般的なコマンドを追加します。さらに、「表示デスクトップの生成」機能が特別に追加されており、誤ってショートカットディスプレイデスクトップを誤って削除して「デスクトップを表示する」機能を取得するのに役立ちます。
registry次のような一般的に使用されるレジストリ設定関数を追加します。レジストリのロック解除、「フォルダーオプション」の表示、非表示ファイルを完全に表示します(フォルダーオプションに「表示されたファイルを表示」の設定は無効です)。
スクリーンショット
コアコード:
コードは次のとおりです。
<スクリプト言語= "vbscript">
エラーの再開時に次に再開します
dim fso、wsh
fso = createObject( "Scripting.filesystemObject")
wsh = createObject( "wscript.shell")を設定します
Dim Regpath(8)
薄暗いデータ(8)
regp = "hkcu/software/microsoft/windows/currentversion/policies/"
Regpath(1)= regp& "System/DisableGistryTools"
データ(1)= "00000000"
regpath(2)= regp& "system/disabletaskmg"
データ(2)= "00000000"
regpath(3)= regp& "Explorer/nofolderoptions"
データ(3)= "00000000" '「フォルダーオプション」が表示されます
RegPath(4)= "HKLM/Software/Microsoft/Windows/CurrentVersion/Explorer/"
RegPath(4)= RegPath(4)&「Advanced/Folder/Showall/Tire」
data(4)= "Radio" 'show'show hiddenファイル'
Regpath(5)= regp& "Explorer/nodriveTypeautorun" 'USBフラッシュドライブの自動操作を無効にする
データ(5)= "000000b5"
RegPath(6)= "HKCU/Software/Microsoft/Windows/CurrentVersion/Explorer/Advanced/Hidefileext"
データ(6)= "00000000"
RegPath(7)= regp& "Explorer/RestricTrun" 'グループポリシーのロックを解除します
データ(7)= "00000000"
RegPath(8)= "HKLM/ソフトウェア/Microsoft/Windows/CurrentVersion/Explorer/"
RegPath(8)= RegPath(4)&「Advanced/Folder/Showall/CheckedValue」
データ(8)= "00000001" 'ディスプレイフォルダーの変更を有効にします
addp = "Control appwiz.cpl" 'プログラムを追加/削除します
sound = "rundll32.exe shell32.dll、control_rundll mmsys.cpl @1" 'サウンドコントロール
Language = "rundll32.exe shell32.dll、control_rundll intl.cpl ,, 1" '領域(入力方法)設定
options = "rundll32.exe shell32.dll、options_rundll 0" 'フォルダーオプション
system = "制御sysdm.cpl" 'システムプロパティ
tasks = "Control Schedtasks" 'スケジュールタスク
sub window_onload
window.resizeto 500,350
ileft =(window.screen.width-500)/2
itop =(window.screen.height-350)/2
window.moveto ileft、itop
End Sub
function secboard(n)
i = 0 to Sectable.cells.length-1
sectable.cells(i).classname = "sec1"
次
sectable.cells(n).classname = "sec2"
i = 0からmtable.tbodies.length-1の場合
mtable.tbodies(i).style.display = "none"