Компьютердик вирустар көбүнчө жумушчу столдун бардык иконаларын алып салуу функциясын камтыйт. Программанын сүрөтчөсүн колдонуучу өзү тазалап жатканда кокустан алып салат. Иш тактадагы сүрөтчөлөрдү калыбына келтирүү маселеси баарына туш болушу мүмкүн.
Нускамалар
1 кадам
Пуск баскычын чыкылдатып, издөө тилкесине regedit деп териңиз. Бул сиз реестр редакторунун утилитасына кирүүгө мүмкүндүк берет, ал жакта өзгөртүлүшү керек болгон параметрлер сакталат.
2-кадам
Экрандын сол жагындагы тизмеден баскычтарды тандап жана ырааттуу ачыңыз: HKEY_CURRENT_USER
Программалык камсыздоо
Microsoft
Windows
CurrentVersion
Саясат
Explorer.
3-кадам
NoDesktop терезенин оң жагында көрсөтүлгөндүгүн текшериңиз. Болбосо, аны тейлөө менюсунан "Жаңы параметрди түзүү" баскычын тандап, түзүңүз, ал ачык реестр редакторунун терезесиндеги бош орунга оң баскыч менен чыкылдата алат. Параметрдин түрүн DWORD кылып коюңуз, бул сандык маанилерди сактоого мүмкүндүк берет.
4-кадам
Жаңы түзүлгөн параметрди талаага эки жолу чыкылдатып, анын аталышы менен ачып, 0 маанисин киргизиңиз. Айрым учурларда, жумушчу столдун сүрөтчөлөрүн калыбына келтирүү үчүн, параметрди толугу менен алып салууга туура келет (эгер ал зыяндуу программа тарабынан түзүлгөн болсо). Иш столунун сүрөтчөлөрүн калыбына келтирүүнүн альтернативдүү жолу - бардык жумуштарды аткарып, сценарий жазуу.
5-кадам
Блокнотту ачып, иш тактаңызда тексттик файл түзүңүз.
6-кадам
Төмөнкү маанини киргизиңиз:
Dim WshShell
Күңүрт мааниси
Dim ResultOn Error Resume NextSet WshShell = CreateObject (″ Wscript. Shell ″)
Value = WshShell. RegRead (″ HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerNoDesktop ″) If (Value = ″ ″) or (Value = 0)
Натыйжа = MsgBox (″ Иш такта сүрөтчөлөрү көрүнүп турат. Жашыруу? ″, 65, ″ Жыйынтыкты окуу ″)
эгер Натыйжа = 1 болсо, анда Мааниси = 1
Башка
Натыйжа = MsgBox (″ Иш такта сүрөтчөлөрү жашырылган. Көрсөтүү? ″, 65, ″ Жыйынтыкты окуу ″)
эгер Натыйжа = 1 болсо, анда Мааниси = 0
End ifWshShell. RegWrite ″ HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerNoDesktop ″, Value, ″ REG_DWORD ″ Result = MsgBox (″ Операцияны аяктоо үчүн кайра баштоо керек
эгер Жыйынтык = 1 анда
Set OpSysSet = GetObject (″ winmgmts: {(Shutdown)}). ExecQuery (″ Win32_OperatingSystem * тандагыла, ал жерде Башталгыч = чыныгы ″)
Ар бир OpSys үчүн OpSysSet
OpSys. Reboot ()
Кийинки
End IF
7-кадам
"Файл" менюсунан "Сактоону" тандаңыз. "Түрүндө сактоо" ачылуучу менюсунан "Бардык файлдарды" тандап, файлдын аталышын жана.vbs кеңейтүүсүн киргизиңиз. (Мисалы: Desktop Icon.vbs)
8-кадам
Сценарийди иштетип, компьютериңизди өчүрүп-күйгүзүңүз.
