vbs script

ⓢⓐⓟⓛⓔⓡ

zdravým potrebujem pomoc s vbs scriptom.

Potrebujem aby ked otvorim ten script nech sa zapise do registra aby sa otvaral pri starte.
Jednoducho potrebujem vediet ako sa pomoocu vbs scriptu zapisuje do registrov.

Kód: Vybrať všetko

const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set StdOut = WScript.StdOut
 
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_ 
strComputer & "\root\default:StdRegProv")
 
strKeyPath = "SOFTWARE\pokus"
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

strKeyPath = "SOFTWARE\pokus"
strValueName = "meno"
strValue = "hodnota"
oReg.SetStringValue KEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

addictor

co takto skusit uja googla....

TU je slusny clanok, ako vystrasit kamarata pomocou VBS skriptu....je tam aj odpoved na tvoju otazku:

Kód: Vybrať všetko

This command will copy your script to C/Windows/System32

Wshshell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\filename","C:\PATH OF YOUR CHOICE\FILENAME.vbs"

You need you use this command with the copy command in order to work...
NOW, THIS IS EVIL !
This command will add your script to the startup program list, so every time your victim starts his computer, the script will run itself.
Please, remember to add

Set wshShell = wscript.CreateObject("WScript.Shell")