Parolare fisiere

Creat in 1996, sublimbajul VBScript este derivat din limbajul Visual Basic. Functionand in mediul WSH este folosit pentru multiple operatii administrative insa multi il asociaza mai mult cu virusii! Datorita functiilor cu acces la fisiere VBScript este un limbaj de temut. Cu ajutorul acestuia pot fi creati virusi extrem de puternici!
Pe foarte multi ii intereseaza asa-numitul virus "shutdown", de fapt un fisier vbs care odata activat (dubluclick) declanseaza inchiderea computerului. Este format de cele mai multe ori dintr-o simpla linie de cod (uneori are si cu un msgbox de avertizare) si nu este periculos. Este mai mult o gluma care circula intre elevi pe YM.

In exemplul de mai jos nu vom crea nici un virus caci nu-i frumos! Vom crea un fisier vbs prin intermediul caruia puteti stabili deschiderea unui fisier (joc, aplicatie audio, browser, messenger ...) numai printr-o parola. Aditional, la fiecare deschidere a fisierului, intr-un fisier text, va fi notata ora deschiderii.

Deschideti un fisier text si copiati codul dintre liniile punctate (fara linii):

...................................................

Dim WshShell, go, nr, fso, t, fisier, cale, parola, mesaj

mesaj="Enjoy"
parola="5"
cale="C:\Program Files\Mozilla Firefox\firefox.exe"

Set WshShell = CreateObject("WScript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")

    nr = InputBox("Introduceti parola:")

        if nr=parola then
            WshShell.Popup mesaj
            call Creare_Fisier
            Set go = WshShell.Exec(cale)
        end if

Sub Creare_Fisier
t=("c:\log.txt")

    Set fso = CreateObject("Scripting.FileSystemObject")

    if fso.FileExists(t) then
           Set fisier = fso.OpenTextFile(t,8,true)
           fisier.WriteLine(time)
           fisier.Close
    elseif fso.FileExists(t)=False then
           Set fisier = fso.CreateTextFile("c:\log.txt", True)
           fisier.WriteLine("Created by DG Botez!")
           fisier.WriteLine(time)
           fisier.Close
        end if

End Sub
...............................................

Salvati sub nume.vbs (inlocuiti nume cu ce titlu doriti). Daca folositi fisierul in forma originala va fi deschis fisierul Firefox.exe daca sunt indeplinite trei conditii:

- fisierul exista (firefox.exe)
- calea este corecta (C:\Program Files\Mozilla Firefox\firefox.exe)
- parola introdusa este cifra 5 (daca nu este introdusa parola corecta nu se intampla nimic)

Puteti efectua modificarile specifice nevoilor dumneavoastra prin schimbarea valorilor variabilelor (caracterele dintre ghilimele):

mesaj="Enjoy"
parola="5"
cale="C:\Program Files\Mozilla Firefox\firefox.exe"

Cam asta este tot! De-acum puteti parola orice fisier! Chiar daca nu este infailibila, metoda functioneaza cu succes in cazul utilizatorilori incepatori! Acest fisier poate fi modificat astfel incat sa devina puternic insa nu este scopul acestui articol.

- Puteti crea oricate fisiere doriti.

Nota:
- Cu unele jocuri nu functioneaza!
- Retineti periculozitatea fisierelor de tip vbs!

Daca doriti mai multa securizare deschideti regedit si modificati/creati urmatoarele valori:

Restrictie click dreapta pe desktop
HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer
NoViewContextMenu REG_DWORD 1

Restrictie Desktop
HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer
NoDesktop REG_DWORD 1

Disparitie Taskbar
HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer
NoSetTaskbar REG_DWORD 1

Restrictie CMD
HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\System
DisableCMD REG_DWORD 2

Restartati computerul pentru ca noile setari sa aiba efect!