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"