Anatoly Demidovich scrie winlocker pe VBScript și VB6

In acest articol voi discuta despre cum să scrie un dulap simplu, ca să spunem așa, pe genunchi.
dulap nostru va consta din 3 fișiere:
1. VBS script-uri pentru a ucide procese
2. Bibliotecile pentru a seta poziția a ferestrei aplicației HTML deasupra altor ferestre
3. HTML-aplicații pentru întindere întregul ecran
Nu incercati asta acasa :)

Să începem cu procesele ucigașe. Deschide notebook-ul. Eu folosesc Notepad ++. Scrieți un cod simplu:

Salvat cu extensia VBS.
Script-ul la fiecare al doilea monitor procese și apariția de ucide proaspete. Puteți încerca să executați.
Vă recomandăm de pre-lansare Task Manager, în scopul de a ucide în condiții de siguranță a procesului wscript.exe. După rularea script-ul pentru a lansa Task Manager nu va funcționa. Devine clar de ce avem nevoie de ea :).

Continuăm.
De ce avem nevoie pentru a scrie o bibliotecă? De la VBS pentru a obține mânerul ferestrei nu este real, dar este avem într-adevăr nevoie pentru a seta poziția ferestrei deasupra tuturor ferestrelor, astfel încât să creeze un așa-numita Wrapper - biblioteca, care ne va ajuta să utilizeze API-funcțiile în scenariu.

Pentru a obține un mâner folosind funcția FindWindow din bibliotecă user32.dll pentru a seta poziția ferestrei deasupra tuturor - funcția SetWindowPos, și să interzică utilizarea unei combinații de tastatură Alt + F4 - funcția RegisterHotKey din aceeași bibliotecă.

Deschideți VB6 IDE, a crea un proiect ActiveX DLL și numele clasei de proiect WinLocker - WLClass, scrie un cod simplu:

Kompliruem DLL. Biblioteca este gata de utilizare.

La sfârșitul ETM. Deschide notebook-ul. Scrierea codului:

Nu este greu de ghicit că:

SINGLEINSTANCE = „da“ - interzice lansarea simultană a aceluiași nume HTA
showInTaskbar = „nu“ - interzice afișarea aplicației în bara de activități
Border = „none“ - elimină marginea ferestrei de aplicare
SCROLL = "nu" - elimină scroll

Salvați fișierul cu HTA. dulapul nostru gata. Run.

P.S. Nu încercați să „dopilivat“ codul în scopul utilizării ilegale